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Wir haben die 
tollsten 


Programme... 


Von unserem Super-Software-Programm sollten auch Sie profitieren!!! 
Denn wir haben die fantastischsten Spiele und die tollsten: Hilfspro- 
gramme!!! Wir haben die Programme, die Sie haben sollten!Y! 


CHESS MACHINE 

Das neue Schachpregramm, mit der ganz tollen Grafik. Sowas haben Sie nach nie. ge- 
sehen| — Höchstens bei Computer mit Super-Höchauflösender Grafik! — Und.der 
Clou. CHESS MACHINE gibt Kommentare zu Ihrem. Spiel. Damit Sie’endlich einmal 
wissen was Sie richtig, und was Sie falsch machen | Sieben Spielstufen | 

Preis auf Cassette: 59,-- DM Preis auf Diskette: 68,-- DM 


SUPER BASIC — DER UNGLAUBLICHE NEUE BASICCOMPILER 

SUPER BASIC verarbeitet Felder (z. B. DIM B$ (9;9,8) geht!) } SUPER BASIC: ist 
fast Kenpasioel zum Colour Genie Basic! Übersetzte Programme laufen bis zu’300x 
schneller! 
Preis auf Cassette: 89,-- DM Preis auf Diskette: 99,-- DM - Mit Disk-Befehien!!. ! 


SUPER ASSEMBLER — DER ASSEMBLER, DER NEUE MASSSTÄBE SETZTI. 
Was Sie mit diesem Assembler alles übersetzen können ist unglaublich 11] Und die vie- 
len Befehie, die der versteht. Die Disk-Version assembliert auf’ Wunsch direkt von der 
Diskette (Source-Code bis 170K I)! 

Preis auf Cassette: 89,-- DM Preis auf Diskette: 99,-- DM 


HELIKOPTER 

Retten Sie die armen hilflosen Menschen! Versuchen Sie den weißen Elefanten zu 
überfliegen. HELIKOPTER — Das nn ‚von dem die Fachpresse schwärmt! (Siehe 
z. B. Computer Kontakt Nr. 6-7/84) 

Nur auf Cassette lieferbar ! :Preis: 59,-- DM 


GORILLA 

Die fantastische Donkey-Kong Version für Ihr Colour Genie. Mit 0 verschiedenen 
Bildschirmen! 

Nur auf Cassette lieferbar | 2 "Preis: 49,-- DM 
FIREBIRD 

Können Sie die Erde vor den erbarmungslosen Angreifern aus dem All retten??? 
Super-Action ist garantiert! 

Nur auf Cassette lieferbar! ' Preis: 49;-- DM 


'PACBOY 


Helfen Sie dem kleinen PACBOY vor den hungrigen Gespenstern zu entkommen! 
Preis auf Cassette: 49,-- DM Preis auf Diskette: 56,-- DM 


VORTEX 
Bewahren Sie die Ringe.des Saturn vor den Aliens. Schaffen Sie das??? 
Preis-auf alt 49,-- DM Preis auf Diskette: 56,-- DM 


ASTRA 


- Fliegen % den schnellsten Reha NEE der Erde und Yenlchien Sie die Angreifer 


Preis auf Cassette: 59,- . Preis auf Diskette 66,-- DM 


Sie sehen, wir haben m jeden | Geschmack etwas zu bieten. Also beste Ion 
Sie noch heute bei: Heinz Hübben, Abt. tee, 5429 Marienfels 


Versand per Nachnahme. + 5,-- DM Porto Versand per Vorkasse: N 
AUSLAND 
VORKASSE 
EURO-SCHECK 


'+ DM 5,-PORTO 





h eigener Sache 


iebe: Leserin, tieber Leser! \ En 2 


Ich. muß. heute: wieder. einmal ein } paar Worte 


N. Sie, richten. eh 


\EA:- In ieser: ht muß 3: 
Is erstes ‚bei, ‚Ihnen NE 


"machen, wie:.er: 


i interessieren, was Sie mit. Ihrem Computer 
eingesetzt wird, welche 
"Probleme: ‚Sie: damit. lösen, Vielleicht macht‘. 

der‘ eine: oder: andere vc 


:Ihnen irgendetwas 


mit seinem. Gerät, was alle: ‚Leser. „interes- 


siert. Also,: schreiben : Sie: ‚mir.‘ Sie 


RS mich . ‘übrigens ‚auch: ST gi 
SA liebsten. „wäre. ‚mir. 


is gung öder Kritik haben, meine ‚Nummeı 
":06772-1261.: 


eit a 'hofie,. "daß. Sie. ‚dafür Ver- os 

: n...Auch .das: angekündigte, Ad". 
venture: ü ‚Colour: ‚Genie, 47ıl, musste bis‘. 
€ uf. ‚die nächste. en verschoben werden, = 


Ich bitte. ‚Sie, machen: ‘Sie, von: 


‘Möglichkeiten: Gebrauch, denn es u un: 
‘sehr schwer, die :GENIE: DATA für Sie pas- 


‚send zu; machens; SEND ‚wir nicht ‚Ihre Mei- 


; 'nung. ‚kennen! 5 


Eine “andere. "sacher Wie: ‚Sie. in. ‚dieser. 


. Ausgabe lesen. können; haben . wir. ‚den 'Abo- 
Preis: auf. .48,-- DM für sechs Hefte. gesenkt 


E ; K ‚Wenn „Sie ‚also ' 
eng unseres 'Pascal- Kurses, dei Sie-übri- = 


gens' gut mit. der: Einführung in strukturier- : 
‚tes a meien. KR können. : Was. ieh... 


5 s 5 Abe Narteile 


schon immer‘ En 


"Und: Sie haben. un 
‚Sie. "können ‚kostenlos ' .inse= 


ch a und die. ‚GENIE- DATA kommt sofor 


dnenslorale 


usprobieren! ‘Haben: Sie ‚übrigens. schon, gen 


vußt, daß im: ‚ROM einiger. Genies ein: teil“ . 
‚eine ‚vergessen ' z 
FW Sie damit- machen ‚können, hat 


‘Monitor- -Programm.. 


'Sie. ‚ausgetüftelt,. näheres. 


"Überhaupt elsube ich, daß’ one GENE . 
DATA, ‚immerhin. ‚die erste 82 18 u 


Ei "Gratik: 
em Programm. lassen sich ‚prima 
en. Das sollten‘ Sie’ unbedingt ‘einmal: 


Im. Software-Service "finden : Sie wieder. 


‚viele BISBanne aus. ‚dieser. ee 


Spuch für die‘. „nur: Käufer" haben. wir un 


= "etwas "einfallen lassen: Wir. bieten Ihn ni 
= ‚dieser > 

= ‚Software; ‚Paket. mit ee bei de 
Auch, ‚den ‚Artikel: von Herrn 


‚Ausgabe: ‚zum: ersten N 


“Sie sowieso. anregen twas RS 


ng der: GENIE DATA u 


. a Artikel 














"wurde; 


24 GENIEDATA 


Be Nehmen wir an, ‚Sie bahn: etaraa 
geschrieben, von dem .Sie glauben, 
"2." daß. es’auch für andere ‚Computer- 


‚freunde: interessant sein: könnte. 


Br ‘Was tun Sie damit? 'Sie' schicken: 


es.-an. uns,: damit: es eventuell: in 


der GENIE DATA abgedruckt 
‘© wird. Auf. diese ‚Art. und : Weise 
"kommen: die meisten Artikel zu- : 
'"stande, die : Sie :in .der GENIE 


DATA lesen können. : - 


_ Um uns zu gestatten, Ihre Ein- : 
sendung. zügig Zu. testen, und um 
= uns. die: ‚Arbeit zu erleichtern, 

:gollten Sie. bei..der Einsendung 


„aber einige Regeln beachten. eo 
e 1. 


ne Leien: Sie Ihrer. Einsendung ein: 


: Anschreiben bei, auf dem. steht, 


was. Ihr Programm kann, für wel: 

“chen Computer. ‘es. geschrieben 
he: Speicher. es. 
> .»braucht, welche Peripherie ‚benö- 
. tigt wird, unter welchem Betriebs-; 
2 ;8ystem: es läuft, ‚was. ‚man benötigt 


wieviel: 


‚um es einzugeben. . 


: Handelt: es sich. u eine: Härd- j 
& wareentwicklung, :brauchen ; „WIE. 
auch. einen ‚Schaltplan und falls 


möglich ein Platinenlayout. 
2; 


: 5 Eine genaue Progammbeschrei- 


| WIE SCHICKE Ich“ a 
MEINE PROGRAMME EIN 


bene ‚oder‘ Funktionserliuterung 
beiliegen.: 
Je sudährche, desto besser! 


muß: jeder Einsendung 


Jeder Einnndang muß das: Pro- 
gramm. auf Datenträger beigelegt .: 
werden. Diese De sollen . 


sein: 
COLOUR GENIE: Disk oder cc. 


'GENIE/TRS 80: Cassette: 
--GENIE IH: Diskette: 
'GENIE 16: Diskette 


GEN IE u 8: Cassette 


A. 
Ein ‚Ausdruck Ihres. Programmes 


muß so aussehen: 


‚Schrift: 12. CPL: 
Breite. der längsten Zeile: maximal ' 
..18.cm.. 

Farbband: Schwarz und möglichst 


neu. 25 


Baer 
Jedes ne Blatt ak iken 
‚Absender tragen. Falls möglich - 
; geben. Sie auch eine Telefonnum- ' 
.. mer an,: unter der man. Sie errei-: 
‚chen kann ‚von wann, bis wann N. 


"Eingesandie Artikel sollten, 80- 
. lange Sie bei uns sind, keiner an- 
-. deren Zeitschrift en wer- 
; den. ns 


Das Bomae vernban 
Ihnen persönlich, da 50,-- DM pre 


‚gedruckter Seite manchmal: 
‚recht sind! a 


Bis Ihre Einsendig von uns 


“arbeitet wurde, können zwei W 
= ‚chen vergehen, danach können Sie 
:.bei uns: telefonisch: erfragen, ob 
‚Ihr Artikel veröffentlicht: wird. 
BF 


! "Eingersndte: Artikel und Manus- 


kripte können nicht zurüc 


‚schickt. werden. 25 ; 
‘Der Preis für den Datenträger wird 
Ihnen bei. Veröffentlichung er- 


stattet (2,-- 


DM fir 0.15, 
fürDik, 0 0 


"Jedem; "Autor senden; wir,; falle ine 


Veröffentlichung geplant ist, einen 


‘Vertrag zu, in dem der Autor alle 


Rechte ‚am. Artikel ‚an uns ver- 


trag unterschrieben. zurück ha 
kann: ‚eine, ‚Veröffentich 


‚folgen. n 
:Wenn Sie: uch: an alle diese. Punk- 
.te halten, :haben Sie: die größte 
: Chance, das Ihr Artikel veröffent- 
‚licht wird, ‚Also, machen Sien 


& Die kostenlose KUNDENDIENST- INFORMATION 


_ GENIE NACHRICHTEN 


2 i bei Ihrem Händler ; zu u haben! 


| . oder anfordern bei 
HEE L-VERLAG 


Postfach 320 220 
5300 BONN 


ee "BESTELL- couron “ 
Fi, sönden ‘Sie mir kostenlos die rg 


‚der GENIE- ‚NACHRICHT 





PASCAL, Teil? 2 


So, hier ist: der zweite Teil unseres Pascal. Kurss; i 
Heute: bekommen. Sie: die restlichen‘ Erklärungen 
'vom: letzten: Mal: und: erfahren. “einiges . über‘ die: 
Seite7 x 


Schleifen i in Pascal 


‚out ‚und. ‚Steuerprogramm 


WIE SCHICKT. MAN PROGRAMME EIN: 


Wenn. auch. Sie einmal als Autor: für die me: 
DATA aktiv werden wollen, sollten Sie sich zuerst 
‚Seite 20 2 


einmal unsere Richtlinien durchlesen 


= HAMU RABI: 


Stellen SICH sich doch. einmal, vor, Sie wären "der 


‚König. eines ganzen: Landes; ‚Jetzt müssen Sie ‚Ver. 
suchen; . ‚klug, ‚zu. wirtschaften, das Land zu. ver- 
 'grössern usw. Aber: denken sie. daran, keinen Ein-\-: | 
Ei: „Beite, 22... ErEER; 
"GEHIRNTRAINING : SER TE 5 
ET ELE, Lässt: Ihre Konzentrationsfählgkeit nach? Wird Ihr “ 
Es gibt ja so tolle Befehle, wie MERGE oder. SAVE u 
EINE. ‘Schade: nur, wenn: man Sie: nicht hat! Um‘ 
solche. Befehle‘ ZU: ‚bekommen, brauchen: Sie keinen. 
‚tippen Sie: einfach das‘: ‚Pro-.© 
.. Seite 26 a 


TAUSCH 


wohner. ‚verhungern zu lassen! 


RETTEN UND MISCHEN 


neuen. Semmputer,, 
‚gramm ab! 


Be ‚man Stnukturiert:: orale 
“ wort ‚sind 'Struktogramme, 





RS 232 STEUERSOFTWARE 13 
‚Im: Colour: Genie: existiert ja: ‘eine RS: 232 Schnitt- 
stelle. ‚Sie liegt. nur leider brach, weil keine Soft-: 
- ware‘ ‚vorhanden: ist, ;die: diese Schnittstelle: steuert... 

Hier. erhalten Sie ein. ‚Maschinenprogramm,, mit dem: 

"Sie Bytes über die RS 232 Schnittstelle ausgeben 
. können. ‚Sogar die Baud- Rate ist ‘frei. wählbar. EEE 


DER VERGESSENE MONITOR _ Se 
-: Die Genie |.und.Il Macher haben bei vielen Gerdten, RE 
‘im: Level IV. ROM. die Bruchstücke eines.Monitor- 
‚Programmes. vergessen: wie Sie ‘damit ‚noch. arbeiten 


bringen! l 


für ‚GDOS und NEWDOS 80. 


PLOTIIM TEST 
"Was: dieser. neue Plotter alles leistet, 
diesem Artikel. 


3D GRAFIK 


Haben Sie schon einmal toll: bewegte: drei dimen- 
sionale:: Grafiken ‚gesehen? Wenn: zum Beispiel: ein. ; 
Schriftzug: ‚groß auf..dem Bildschirm ‘steht, .dann. 
„nach: hinten‘ wegläuft und sich. dabei: überschlägt?. Be 
"Mit diesem Programm können. Sie solche. Effekte er; 
Be we auf: Ihren Colour: Genie, Monitor zaubern: 
Wie: !man mit. “dem: Colour: Genie schaltet: ‚ader; ö 
Eingänge analysiert,. ‘erfahren: Sie. hier. Selbstver- 
ständlich ‘mit ausgereifter‘ Schaltung, Platinenlay- N 
»Seite 15-7: 


Seite: 36 2 


- Seite 40. # 


können steht ab. ‚Seite 41 A 


Gedächtnis. immer: schlechter? .—.:Keine‘ Angst, 1 


wir'machen hier.keine ‚Werbung: für: irgendwelche 
::Power- Pilten! ‚Aber mit: unserem: Programm können: 


Sie Ihre: kleinen, ‚grauen ‚Zellen wieder auf Touren 
BE ‚weite. 2 


Hier: kommen Sie: ein nützliches. Hifgprogramm, 


lesen. Sie: in. 
‚Seite‘ 52. 


n SCHIFFCHENN VERSENKEN a 
Zum. guten. ‚Schluß noch ‚ein: ‚Spiel, das Sie wöhl 
:älle kennent;; 





;ENIE DATA, Ausgabe 7, Jahrgang 3, 1985: 


; jeräusgeber: Be und. R: Hübben, Offsetäruck 
‘und'Verlag;; 5429; Marienfels/Ts... Fa 
hefredakteur: -Ralf:M; ‚Hübben‘ 


iteigestaitüng::: H;:;und:R.; 'Hübben.: ‚Offset. 


druck: und: Vertag;. 5429) Marienfeis/Ts:; 
"Satz... und: R. Hübben, . Offsetdruck, und. 
‚Verlag, 5429: Marienfeis/Ts::: Te 

TS Hoinunaswellg; Alle zwei, Monat 


Abörinements: :48; =: DM. incl, ‚Porto, Verpak- 
kung:und: gesetzi. MWSt. . ESF 
Erfültungsort: ‚5429 'Marienfels/Ts. Be : 
Gerichtsstand: In: jedem. Fall: das: ar u ‚unseren 
Verlag zuständige:@Gericht. ; 
Manuskripte: Unangeforderte "Manuskripte 


rden:nür: zürückgesandt, wenn. ausreichen- ie 


des: Rückporto. beigelegt: wurde. Jeder. Ein- 
er. erklärt. sich durch: die Einsendung:mit:: 
r: Verörfenttlehung. :des aingesandten. Ma- 

terlals:in ENIE:DATA' YE 


2 Copyriant: (© 1984 by Hur Hübben, Offset-:" 
“grückerei: und, ‚Vert89.::5429 :Marienfeis: Ts: 
Nachäruck, 'Vervisifältigung, ; ‚Übertragung son; 


wie: Spelcherung:in EDV-Aniagen verboten. 


‚Bei ‚Bauanleitungen : ‚und/oder.‘ Programmen ': 


"Kann für. die. Fehlertrelheit: keirie‘ ‚Garantie 
übernommen. werden. 


Die "Meinung der ‚einzeinen' Autoren‘ muß : 


nicht: mit.der des. ‚Verlages übereinstimmen.: 


= Anfragen.'an. die. Redaktion. bitte: nur: schrift. = 
lich mit'beigelegtem' Rückporto::' 
227: Kündigung: der. Abonnements: Zu jedem: Jahr, Er 
„rechtzeitig, vor: Enda'des Jahres: (6 Wochen).': 
Jedes Abonnement verlängert. sich: nach! ‚Ab- 
"Jauf automatisch: um ein Jahr. ! 
> Sollte”die.GENIE:.DATA' aus. Gründen;; die; 


nicht In: der. Verantwortung des‘ Verlages: lie 


:gan;.nicht..oder nicht. rechtzeitig erschein 
: besteht kein. Anspruch äuf Nachllaferung.:'- 
Für eventuelle‘: Schäden: und/oder. Folgeschä-::: 
‚den:.an' Geräten: und:oder Bauteilen: und/oder: 
Datenverlust: kann: keine. Haftung: übernom:::: 
men werden... Der 'Nachbau.:unserer Bäuänilei- 
tungen: und/oder: die:. ‚Anwendung von: Pro- 
grammen aus. der: Miktelı DATA Sn auf.:- 


wie alle, Rechte. ‘vorbehalten. Es kann Keine; 


Gewähr. dafür. ‚übernommen werden, daß: die‘: 
:‚verwerideten: Schaltüngen,: Firmennamen, Wa: 
bi renbezeichnüngen‘ und:alle: anderen: ‚Angaben 
frei'von Schutzrechten: Dritter sind: IE 
‘Sämtliche: Veröffentlichungen erfolgen: ‘ohne. 
Berücksichtigung: eines eventuellen: Patent: 
schutzes. ufd/oder.: Gebrauchsmusterschützes. 
"Bei: alten : Artikel-Einsendungen: gehen: wir:da- 
von:aus, daß: ‘der.iVerfasser. alle Rechte ander. 
EN Einsendung' besitzt; sowle: geistiger. Eigentü- 


mer.ist. 
Ober: jed Artikel-Einsendung freuen. wir 
‚Honorar: 


= Nach Vereinbarungl. 


Wir gestatten jedermann, min Artikel a aus der SE 
.GENIE: DATA: zu entnehmen, und..in einer. 
anderen; nicht: kommerziellen, Druckschrift 


zu ‚veröffentlichen. unter: der:Bedingung,' daß 


"an: der: Sestaltung: :nichts:verändert: wird, das 
erwähnt: wird, daß:.der.: betreffende: Artikel 
"aus.; der‘. GENIE: DATA: entnommen‘: ‘wurde 
“und.:daß: man. uns'.mindestens:ein: Exemplar 
“ de ‘betreffenden: Druckschrift''kostenlos,: 


"Erse eine! 





"BESTELLUNGEN 
es AN. 

“Heinz u. Ralf Hübben : 
Offsetdruckerei / Verlag 

. Software-Verlag 

».:: Mühlbachstraße 2  . 

f D-54299 Marienfels/Ts. 


E: Das. COLOUR GENIE BUCH aus unserem n Verlag nk unter anderem: Neue und alte ROM's im. im Ver- 
gleich, alle Z80 Maschinenbefehle i in übersichtlicher Form, Joysticks-selbst gebaut, was.braucht man ; 
am Software, ‚wie arbeitet: man ‚mit dem ‚Bildschirmsteuerungs- IC, wie programmiert. man den PSG BE 


. . mit vielen Ben ielbrograinman: viel Software zum abtippen, und, und, und . 
Das COLOUR GENIE BUCH von:uns müssen Sie haben! Es bringt‘ Ihnen. 
BE nötig brauchen. Für Anfänger und Profis! 


"Also bestellen Sie sofort! 11 .49.-- DM. 
. 56 Seiten stark, für Sie geballtes Wissen! 


Mit : COLDAT können Sie Adressen: eingeben, Inden, indem, Aufkleber | | 
‚stellen, salcktieren, und, ‚und, ‚und, .. a 


deutschem Handbuch nur 9, - DM! 


: ! Übrigens COLDAT. ist durch se Schirm und. 
‚bedienen! 








ich: ne en 
© Befehle zwischen BEGIN und 


as. werde. ich‘ anhand: ‚einiger 


Auch werden sie wieder einiges: "Jetzt lassen Sie die Zahlen und L 


N: WB ‚das ein ‚WRITELN so a 


erste Zeile holt eine "gedrlckte: Taste von: 
‚Tastatur und Beer sie.in. \,def‘, :Varjabien a 


tur ein, N ein, 
issen. n kann, ob. 


‚sieht dam. ‚SO: aus: - ei 
"var. a,b,e ann ‚integer; - a 


lei a5. 


Pascal schreiben.. Wenn Sie dazu 


einen. der ‚Compiler, - die ich: in..der. letzte 


Ausgabe erwähnt, habe, benutzen, ‚schicken Si 


Ihrer Pascal nr n;: 
was nicht... Oder MW 


2 Diese könnten wir. dan 


Eingabe. en ® 


etwas anderes alls ı ein. N einge- 


zur: ‚Diskussion: ‘stellen. EM 


„auf diese ‚Art. ‚und, ‚Weise 


en Ihrem. Intereite, 


So, jetzt: W 


i neuen Stoff. 


0 -Bef, ‚der: Sprache "Pascal; 1. 
Befehle . kenn ie PR. im in a 














- mr. DIESEM | FANTASTISCHEN SPIEL haben. Sie © es nun. "geschafft. Sie sind mitten. “unter. Ihnen. 
:Sie.können den rasanten Befehlen des ‚Computers entgegenwirken. Es:geht auf Gedeih und Verderb. 


ne Drängen . Sie Ihren Gegner ins: Verderben: - Er. versucht. das gleiche mit Ihnen. - Außerdem wird das 





H Spiel immer schneller. -: Treiben Sie’ Ihren Gegner in die Enge! - Lassen $ie ihn ‚explodieren! - ‚Bei: 


1000, 2000, 4000, etc. Punkten, gibt es. jeweils ein extra ‚Fahrzeug. - Balls Ihnen der. Gegner zu ‚gut ist, : 
2. „können Sie mit gedrückter SPACE-Taste den Gegner überholen und. evtl. verniohten. 


2. Dieses Spiel. ist sehr aufregend, ‚spannend :zum bersten und nicht leicht zu: spielen - ‚die, Rekordlist & 
ne wirde es zeigen. - „Man könnte mit diesem Bei einen DEUTSCHEN MEISTER ‚herausstellen! 
E ee PREIS für Cassette NUR DM #8, 


TERRA ” ein n Action-Spiel, "welches. Sie zum: Wahnsinn treibt! - ‚: Föindiliche. Raumschiffe greifen BER 
die Erde an. Sie müssen sie "blitzschnell i inihr: Fadenkreuz. ‚bekommen und: abschießen mit Ihren: Laser: 
. strahlen. Sind: alle ‘Angreifer zerstört, ‚dann kommen noch zwei weitere 'Ängreiferwellen. Im Anschluß u 
- daran erhält man einen Bonus, und .die Punktezahl wird gezeigt. - Danach kommen wieder neue 


‚Angreifer, wobei deren Abstand, ‚ihre Anzahl und die Geschwindigkeit des. Fadenkreuzes von Runde ER 


Retten Sie die Erde!‘ Das Spiel hat Sprachausgabe über Fernsehlautsprecher |: 
‚Eine tolle Bereicherung Ihrer Sammlung auf. Cassette zu einem Some 


a ‚Ihren Panzer in: n Stellung und auern auf die eckchen Panzer und ballern nern: los. - 
BE ‚bei diesem Spiel eine wahre Gefechts Situation zustande, die den. Spieler. derart: mitrei 


nur so. kracht und: runst| Von: Spiel: zu Spiel wird man immer baskor ne der Spaß: ‘wird: gr 
auditbe Grafik ‚mit 3D- Effekten, toller Sound. = Obcigane: tolle, Grafik und wirklich toller Sound 


6 Konnnanauntnunnuunssunuense Re AROMA HRURNEN 


UMP * . EIN, GANZ FANTASTISCHES SPIEL, was s doch such ganz 2 schön nerven kann. Re 
rn ie ein. kleines niedliches Männlein auf einem laufenden Förderband jeweils eine Etage höher z 





U WRITELN 


Wir ‚gehen jetzt: mal. rückwärts "vor: und 
‚schauen uns. als erstes. die ‚Bejehle‘ WRITE ‚und 


WRITELN zn: 8: Ey n 
Mit WRITE. ‚geben! Sie etwas: aus, ohne nach 


der ‚Ausgabe einen Zeilenvorschub zu’ erzeugen. 
E ‚Das‘. entspricht: dem -Basic-Befehl PRINT; . ‚Sie: 
wissen ja, daß das. Semikolon :in Basic. dazu da. 


ist, damit es nach dem PRINT. söfort und ohne. 
Leerzeichen weitergeht. 


Zeile. 


"hnlich:. verhält: es ;sich. mit READ 


"Computer, 
5 eingeben. : Wenn’ ‚Sie. :nach.:der. Eingabe Return 


Ei ‚tippen, weiß. der ‚Computer, daß. Ihre Eingabe 


beendet: ist, und. das ‚Programm wird: fortge- 


. ‚setzt, Bei. READLN. geht. das wie im Basic mit 
INPUT. . D..:h.,. nach. jeder‘. Eingabe ‚fängt der. 
 Computer..eine. neue. Zeile ‚an.‘ Wenn..man aber. 


= READ. benutzt, fängt der Rechner keine ‚neue 
© Zeile an, ‚sondern ‚der Cursor ‚bleibt: hinter Ihrer 
e ‚Eingabe Stehen. er ; 


"= Tippen ‚Sie: Hetze das. "Pro ramm EIN- 
.GABE: AUSGABE: ab: und lassen: 


# ‚das Listing an, und versuchen Sie, das oben ge- 


H ‚sagte, anhand: des Programmlaufes zu 'verste- 
‚hen. Lassen Sie bei Ihrem ‚Pascal ‚unter - Um-: 
‚ständen die Zahl hinter. der String Deklaration. © 


: weg (Siehe Pascal- -Kurs, Teil'1.).: 


ji "Eventuell müssen Sie. den Befehl. zum: Bild-: 
";schirmlöschen ICERSEBE: an Ihr. Pascal ‚an 
ER A Block. von "Änweisungen kommt. Dieser. Block: 
fängt .dann:'wieder mit. .BEGIN; an, und:’endet 
mit END;. Tippen‘ Sie jetzt: einmal das.-Pro-.. 
:gramm SCHLEIFE MIT ..WHILE "ein. .Wenn Sie 


u ves ausprobieren, ‚erkennen Sie,. daß: dieses. ‚Pro 
ders: sein, ‚sehen ‘Sie bitte. in ‚der Bedienungsan- 


Passen. ; 


Sie sehen, . daß ein Text; de "ausgegeben 


werden: soll, eingefasst in Klammern. und Abo- 
‚strophe ist.. ‚Das: könnte: bei Ihrem ‚Pascal: an- 


Jeitung. ‘nach. Die: Variable, in. der. die: Eingabe 
gespeichert. wird, steht ‘nur: in normalen. Klam- 
Ei mern. Also, INPUT A sieht. in Pascal ‚so ‘aus: 


READLN Ay 


Jetzt schauen wir uns. ieinmal: die verschie- : 


5 denen Möglichkeiten any: in. Pascal eine Schleife 
‚zu ‚programmieren. Fe = 


Tippen. Sie bitte einmal das. Programm 
SCHLEIFE MIT. FOR. ein. a 
Als'erstes müßte Ihnen .der Doppelpunkt vor::: 


Gleichheitszeichen Aigen, 


sung. dar. 
‚Diese - Form: wird‘ ‘immer. verwandt, ‚wenn: wir 


Mit WRITELN geben 
‚Sie 'etwas. aus, und nach der ‚Ausgabe wird: ein 
'Zeilenvorschub erzeugt; d. h., der Cursor. geht 


nach der De an: en Anfang. der. nächsten. i 
Startwert. ‚für: die Schleife kleiner: ist ‘als: der‘ 


‚Endwert: k: 'B.. 1: TO. 100),:DOWNTO wird: be- 
hutzt,: wenn. der ‚Startwert größer ist. ‚als: ‚der, 
'Endwert (z.'B..100 DOWNTO: D.. 


und: 
"READLN. Bei READ und: READLN wartet der, 
daß Sie--etwas: über. die: Tastatur 


ie es laufen. g 
:, Schauen: Sie. sich ‘während des’ Programmlaufes , 


Diese: Art nn : 


GENIE DATA 9 
‚Gelesen‘ als: gesetzt‘ u = 


irgendetwas einen. ‘Wert zuweisen‘ wollen, in un=' 


serem- Beispiel ja der ‘Variablen I. Das normale‘... 
Gleichheitszeichen‘ (=): wird zum ‚Beispiel in. Ab-: 
fragen: benutzt, also ‘dann wenn etwas wirklich . 
gleich. ist, oder: wenn die Frage nach, wahr. oder. 
falsch beantwortet. werden soll: 
..Gleichheitszeichen: wird: auch bei .der‘ Deklarä- 


tion‘.von Konstanten ‚verwendet, denn da ist: N \ 
auch: ‚etwas. wirklich gleich. :E E 


"Also: Bei, einer an verwenden: wir 
und: bei ‚Gleichheit verwenden wir. =! 


‘Nach. dem: Startwert für: die Schleife‘ ine. 
TO oder DOWNTO.. TO wird benutzt, wenn. der: 


Jetzt folgt der Endwert: und dann "daß Wort 
DO, um..dem: Computer zu sagen, daß es jetzt: 
losgeht. : Nach .DO folgt kein Semikolen!; Sonst: Ei 
läuft die Sache nicht! an 


Nach DO: kommt: entweder: ein BEGIN; als. . 


ie Schleife ‘geht. hier. los, dann folgen die Be=::#::5: 
; Tehle‘. und...die Schleife wird mit END; abge-: 


schlossen ..(siehe ‚Programm... «SCHLEIFE MIT 
FOR), .oder.es: folgt ein’ Befehl, der. gesshleift = 


Wird (siehe ‘Programm SCHLEIFE . MIT FOR). 


Als ‚nächste. 'Schleife währe. die Schleife ie: : 
WHILE. zu:nennen.. Diese Schleife ‚wird: solange 


ausgeführt, . bis. eine ‚Bedingung erfüllt, ist, 1. Das, 


‚sieht. dann im Prinzip: so aus: 


U WHILE Bedingung Do Rnweisung- ‘ 
Rnweisungsblock: 


Hieran: an ‚Sie, daß "hinter DO sofort eine 


Anweisung. stehen kann, ..oder.-daß..ein..ganzer.' 


gramm erst dann: endet, : wenn Sie: eine. Zahl’ 


‚kleiner. Null. eingeben, also wenn unsere Bedin- : 
‘gung erfült ist. Auf deutsch‘ würde: ‚die Zeile 
Ungefähr! so lauten: BFE : ; H 


SOLANGE eingabe >= 3 TUE. j 
Die letzte Schleife. die wir uns’ 'ärkehen.. ist "die en 


*- REPEAT..UNTIL: Schleife. Die REPEAT..UNTIL . 
2» Schleife: können wir, uns: bildlich etwa so ver- 
‚stellen: RES 


REPEAT. Ban hle 
Anehire 1. ne 
„Anweisung. 2... 





"Das: normale: 


; Das WERSIBOARD- SYSTEM MUSIC 84 kesteht: äus einem. Orgel Mönuall im‘ Commodore 
‚Design, ‚einem: Interface- Modul und zugehöriger Software.: Gemeinsam mit dem. 
Commodore vo 64 entsteht ein Musikinstrument mit bemerkenswerten | Fähigkeiten. 


\ 


Be . 


Hi KEYBOARD | 
:; 2:49. Tasten, 4. Oktaven co 
PROFIFORMAT. 
Gehäuse aus sioßfestemn. Kunststoff 
im Commodore-Design'..: 
“Interface-Modul:mit: Verbindungs- 
‚kabel, anschlükfertig, 


# SOFTWARE 

SE "auf Sy: Diskette . 

— Programm MONO 84-- BEER 

.:: monöphoner Syoihesizer: ne 
== Programm POLY. 64 =: 

2 polyphones Keyboard...‘ 
‚— Klangfarben: direkt. am PC. 

‚vezänderber. ; 


Telefon en, 2 a 
Telex 42323 : Be 


BESTELLCOUPON - a ; 
; Das WERSIBOARD MUSIC 64i ist Klasse! 


Ich‘.bestelle zu ‚sofortiger Lieferung das, 
"WERSIBOARD MUSIC 64 zum: 
" Einführungspreis:von DM 495,- : 


üzgl. Versandselbstkosten:—:': 


als Zahlungsart: 
O:Scheck ist beigefügt 
U per.Nachnahme EB: 


Umersehnt 





GENE DATA_ Mi 


: und gegebenenfalls wieder von vorne ee 


: a Ihnen; bis. zum ‚nächsten. Ma 
viel Freude. an hascal!‘) RE 
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SS u 
An 


‚coLoUR SENIE HARDWARE 


Automatische Cassettenrecordersteuerung u a et 
mit.Einbauanleitung ©... . DM 24,80 
‚Colour Genie Joy Stick - DM 79,80... 


"für Spiele, die’ "sonst mit der. Tastatur 
.. gespielt: WON 


. SOFTW ARE-KATALOG on ; Deere: Probleme? 

nn I MUR nicht sein! al a = ee 

 ANFORDERN! .2°,5,55 Mit unserer Zusatzplatine werden die a Daten digitalisiert a 

2. - In jedem normalen. Recorder einzuschleifen! ee EERIEES 

Mit Einbauplan .. ns "Modul. "DM 98, 
Für die "Alten“ on NEE RERTENSEE 
..Levelmeter Nachrüstsatz kompl mit Einbal: ER EEE 
„anleitung ER SEE 33T .DM..>19,80% 
Commodore VC 20 + VC 4 REN engen 


' Cassetteninterface Vers. 1 mit'Schaltern mit Bedienung 
‘anleitung (wird. nur auf den Port gesteckt). 2 


Für alle: handelsüblichen. Beoprdgr 2 SE "DM 2980 
dito. Vers. 2 Dr 
mit automatischer Motorsteuerung für. den Recorder. 


Versand: ’Entweder- per Nachnahme oder Ber Vorkasse & Mit Bedienungsanleitung Be IE : ee "DM. 36,80 3 


: auf unser. Konto 6611 bei: der SON Osnabrück BR: 
‚(BLZ 26550000. “ Light Pen für C’64 in Vorbereitung “rn 


Bei Bestellungen ab DM 50,- en - Porto und Verpackung frei. .NDR- -Computer-Bausätze bei uns | 








Das Wären hat sich gelohnt. [ Das: GENIE 16; ist ein Profi-Compufer 2 zum Einsteiger-Pr i 

. Mit: einem. riesigen Software-Angebot; ‚Denn ER: GENIE: 16: ist PC-kompatibel. ; 
® 16-bit-Mikroprozessor 3086 Et ® AU/DOS Betriebssystem 
© 128K RAM (bis 768K BAM Speicher eu En LE " terweitertes MS/DOS): | 

ausbaubar) es EN Ze .:,@ Eingebauter Lautsprecher 

© 6AKROM 0.005. Bi: Irgonometrisches Design 

©: 16-Farben 2 .0220.5 CE RE | : Peckempe | 

® AR. JOH lanfwerhe. BIETEN EEE 





Aleinverrieb über ls 
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DIE VOLLSTANDIGSTE MAR KTOBERSICHT FÜR MICRO-COMPUTER 


| „CONPUTER- ‚KATALOG 1985 5 aus dem n HEEL VERLAG ” 


= Es wurde er Wert en 
darauf gelegt, den Umgang. 
mit: diesem ‚Standardwerk so = 
"einfach. wie möglich zu... 
"machen. 
Erstmals wurde i in diesem 
> Jahr: ein umfangre 
e Register mit in.d x | 
en 


| m 1 Lexikonteil Werden di ie. Er) wichtigsten Begriffe der. Computers! mit ein fachen Worten erklärt. i 
‚Außerdem v werden die ZU: Indem Gerät gesannien Spezifikafonen erläutert. : 3 ESBSSEHF ERS 


‚Der. COMPUTER- KATALOG ist. zum Preis von- DM 2680 
im Buch- und Zeitschriftenhandel erhältlich. 


Computer-Katalog 1985; 360 Seiten, Format DIN A 4, über 600 Abb.; Preis DM 26 80; 
rschienen i im F. Ch. Heel | Verlag, Königewinterer 8 Str. 528.536, 3200. Bonn 3. a 





In: ‘der lösten: 'GENIE DATA haben. 
en Eu ‚Colour 


hemi "dieser Karte auf die Spitze 
Deshalb ' erscheint: der: Artikel: 


5 zwei Teilen. Den: ersten Teil:hab N sieh er a 
vor: sich. Er: behandelt: ‚den ‚Aufbau ‘der. Karte: : 
und. ‚stellt ‚Ihnen: ‚ein en EUR. 


olour. ‚Genie losen, en so,‘ "wie 
ein Druc ker. sie. en Ihnen acht: steuerbar 


"nur... für: "Testzwecke ‚benutzt: ‚wer 


= ende einseiti 
‚Leiterbahnen wird, lediglich "am. Port ..ein 





ebenfalls. Sur der Karte. Diese. sollten ‚aber 


N, um ‚da 
Netzteil Ihres ‚Computers. ‚nicht ‚zu: sehr zu. 


e strapaziefen, : 


ENochmal::ine aller: Klee nie Ka ei: 


bieten acht: Ausgabeleitungen, acht angaben 
„heltungen und einige Spannunge 


Die: Platine’ st im: Europztornat a 
‚gehalten. Die Führung der... 


ori .der Platine weg zeigt: Jetzt. folgen ach 
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ERSTE MARKT- OBERSICHT. 
für IB Kompatible SOFTWARE 


"Diesen Trend kolgend“ 
“erschien i im Heel: Verlag : 
erstmalig der:, ‚‚Software- & 
‚Katalog 1985°° . Mit über 
650 Programmen. ist. der ; 
Katalog die größte und. 
ausführlichste Markt= 2.0: 
übersicht auf diesem G a 


Der. Software-Kalalög.: 

gliedert sich i ‚in drei Teile: 

1. ‚Systemsoftware 
Branchenneuvtrale 
Software re 

3  Branchenspezifische, 
‚Software Bi 


Außer: einer Vielzahl von. 
‚techn. Angaben, \ wie Z. B. 
notwendige Hardwarekonfi 
guration oder Programmier- 
sprache, ist zu jedem. Pro= 
gramm: die Bezugsquelle, 
eine. Kurzbeschreibung und 
. der. Preis angegeben. EN 


Anhand les Software- 

at kann der. Com- 

die für sei- 2 

"ne alone optimale 
‚Problemlösung finden, .z. 
‘Rechnungen sch eiben, ; 
.Kündendatei erstel len, 
‚Pafientendate duswerlen. 
oder das Lager. überwachen 
uvm. i 





in = erschienen im:F..Ch 2 rege Königswinterer St 528-536 ‚5300 Bonn:3 





Relais, 


'sollten lediglich bei ‘den: Relais. 


betrachten, ‚müssen. ‚diese ‚so elest, sein? Ha 


nn Kontaktstift 
Spüle; ’ 
E '‚Ruhekontakt' 
=258pule" 
„Arbeitskontakt . 


in alle l-öcher, die jetzt noch: auf. ‚der: Plaic n 
.ne.frei sind, kommt ein Lötnagel. Sie haben: er 

ann, wie. schon: ‚erwähnt, .. ganz links Wenns 
„zwanzig: ‚Portleitüngen. Oben die acht: Einga-.: A 
..beleitungen. B®.. bis. B7: und direkt‘ daneben 
‚GND. ‚Rechts. unten. haben ‘Sie nochmal: #aV: ee 
'Die drei Reihen. von: je. acht Lötnägeln: sind. ni: 
„die Schaltleitungen der. Relais. Die ‚erster. 
Reihe. ist. dabei ..der: Kontaktstift. der acht. 


x Relais, die‘ nächste: Reihe ist:: der: Arbeits-: iE ; ERBE 
i Jetzt. söllten:: alle, ‚Relais. endlich 'ge- 


kontakt und::die "letzte Reihe: ist der: Ruhe- 


kontakt. sollten‘ Sie noch ‚Fragen. zut:: Be- 
tückung haben;.. ‚dann sehen. Sie in Bild l die... 
fertig. bestückte ‚Platine. ‚Tabelle 1: ‚zeigt Er 


| ‘Ihnen die Belegung. des Parälellport. 


Alle. ‚benötigen: Bauteile. uneen Sie Aus "der i 2 
: I u 40. PRINT. x: .GOTO 30. 


5 Stückliste, 


"Noch. eine "Antnerküng: "Sellten. Sie Andat 
daß die Selbstinduktionsspannung der: : 
en. Abfallen, ‚die Dioden: ‚über win-. F 


E mal um; EN: "50 Milliampere. Wir 
‚haben: Relais ..vom Typ‘ 4100::benutzt, "das... 
spielt. aber. :im: ‚Prinzip keine: Rolle. : Sle:t.: 
darauf‘: : 
achten, das'.die: ‚Anschlußwerte stimmen, und. 
das die sechs. ‚Pins: in: die Platine passen.. 
Wenn "wir. uns. die ‚sechs Pins der: Relais. ae 


_GENIE DATA. 2 


Wenn: Sie ‚dien Platine a in 
geht es .an's ‚testen. Überprüfen Sie die .Löt- 


‘seite.der. Platine noch‘ 'einmal ‚genau, ob Sie. 
“nicht TH "Versehentlich' SRZWwei 
.. Zusammengelötet haben, die‘ besser: ‚getrennt 
„sein. sollten. "Jetzt: können Sie die. ‚Platine ; an: 


Augen: 


den: Paralellport. anschliessen. Schalten Sie 


.. den Computer kurz .ein. und: halten Sie Au 
schau: "nach‘. „aufsteigenden , 'Qualmwölkche: 


Sollten: Sie: solche ‚entdecken, - "haben "Sie. 5 
nen: Fehler:‘ ‚gemacht, und: ‚warscheinlich ;hatı: 


sich‘ dann der. 'PSG ‘im. Colour: Genie für 


mer:; verabschiedet. Wenn‘ ‚keine: Wolken: auf- 


‚steigen, ‚sind wir. ‚schon „ein ‚schönes Stück 
‚weiter... w e j i na 


Schalten. Sie: den: anne wieder. ein, 


‚und lassen: Sie. folgendes Programm laufen: 


10: SOUND 7,64:: Rem Port A auf. Ausgab 
.20:FOR: 1-0. TO:255. ö 
‚30 SOUND 14,1: 
:40. FOR. U=1 ‚TO 100 : ‚Rem, nei 
20. NEXT u: NEXT, E: 


Ben Relais le 


klickert haben. Wenn alles. ‚geklappt ‘hat; 


= können wir die Eingeberunkuian sesten: = 


10: SOUND 7,64: 
-20°OUT 248,15: Rem: Po 


"B: Für Eingabe 


30:.X= INP(249) ; ‘Rem Abiragen,, 


Starten. Sie bitte eses Programm Auf. dem 


# Bildschirm sollte u eine 255 durchlaufen. 


Platine 
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- SUCHE:GENIE DATA Nr. 2, 
..3+4.. U. Mast, 'W.-Maybach- 
Str, 9, 7303 Neuhausen/F. 


BRK.CG EG. 2000; "Rec, 
Software, ‚Preis VB; Tel. 0541/ 
124188, 








1-4 T. -Wagner,: P.-Klee-Str. 
118, 5090 Leverkusen 1; : 





©. 32K (neuwertig): +.. Bücher 
Se ‚Software: DM: 350 .--;; ‚Döp- 





; Basic (neuwertig). geg: Gebot. 
Tel. ‚09104/8621. En 







BASICODE2. Hardware . für 






‚sernwen 29, ‚4220 Dinslaken. 





“Gemini 


‚232 und ser, 
. bein‘; 
— . ‚"verkaufen..PREIS:'VB. 
"SUCHE "GENIE: DATA Nr. 


"COLOUR GENIE. EG 2000 : 


 pelfloppy - EG 2300/2-Disk- 


VG | gesucht. Grajewski, Ze-. 


"coLouR GENIE:32K,, De 


NEU! 





_ KLEINANZEIGEN 


_ COLOUR GENIE 5 


"PROG RAMM- Cass. „Verw: 


peldisk.. '360K, DFÜ-Akustik- Alles .ü.d.. Mond ‚mit Mond: Wer hat.d. Progr. aus d. Genie : 


koppler:' 


mit allen RS- 
Schnittst.- -Ka-. 
"absolut: neuwertig...zu 


Disk. . kornpl.. 


Tel. 07053/6074. 





MORSEKURS für. CG,: Info 


-0,80:DM, K.. Müller, .Castro- 
218, 4350 Reck-.: 
er linghausen. 


per-Str. 





"EG :2000,.1 Jahr alt + Lit. 


+.Softw./VB.DM 450, 
"Tel, 09523/6422 


‚Untergang Sonne‘ und 
Mond u.v.ä.m. für 900 Jahre 
u..jeden Ort der Erde. 32:K. 
DM ..49,--.. Info. gg.: Rück: 
porto...b. ..H.. Schumacher, 


42 Oberhausen 1,.Eichstr. 40.; 





‘VERKÄUFE  Expander für 


VG. von. RB-Elektronic: 
G, DIL TeLOOTBUROBZIE 


COLOUR -GENIE -+32K + 
Genie-Rec. +: Joystick‘ +: 50, 
Progr. für:500,- DM 
-,Tel..02551/3916 


SUPER: BASIC! ı 


TRS-80. M1, 


AC-3, Stardrucker. phasengrafik, Zeiten der Neu- Data Heft 4/83 abgetippt Bu 
10x," ‚Software‘ auf. Voll--u. ad Auf- u. u: 


hilft‘ mir; die: 'Fehler- ' 
meldungen zu beseitigen? 
IR 030-81 14569 . 





SUCHE "billiges CG- Floppy! 
A: Becker,; Zur Steinbeck 34, 
5620 Velbert T. 





VERKAUFE "Siemehslauf‘; : 
werk :40:: sold 370,00. DM; 
80: sp/dd.; slim ‚DM: ‚570, = Er 
wegen Systemwechsel.. 
Tel. 0221/501466. 


12’ A8K Disk. 
Doubier, Softw,, NEDOS 80. 
Textverarbeitg. ‚Fortrain, Vi-.. 
sicalc. usw: Literatur. 'VB2200 : 
DM; Tel. 02106/72394 


Auf Disketter nur rDM 99,- m | 
Auf Cassette nur DM 89,- = 


& AUSLAND: | BERE 
DRRASE Eu ro Scheck + DM 5, Porto 


Si, AN: = 
"Heinz: u. Ralf Hübben . | 
. Offsetdruckerei / Verlag; 
Software- -Verlag . 
Mühlbachstraße Zi. 
D. 5429 9 Marionfelay‘ Ts. 


WRIERZEE 
- COMPILIERTES: 
"BASIC-PROGRAMM 
WIRD BISZU 
der neue Maßstäbe setzt! 3m MAL SCHNELLER 


Für DISKETTE und CASSETTE! 


ge 


Compiler 








- Nur: für 32.K 








"COLOUR GENIE, Kaufm. Progr., DFÜ, Drucker, EPROMS! 8... ee 
HKontakle gesucht! H.-]. Winterscheid, "Bennanefeizabe l, 5300 ‚BONN 1 BER 
‚Telefon 0228/224353.. Bier es 










u. RAUM RÜSSELSHEIM vn. COLOUR GENIE- Anwender sucht ; 
gleichen. - Telefon 06142/43746. 


ee RAUM ROSENHEIM ER GENIE. D Besitzer sucht € ringe 
austausch. - ‚Telefon 08071/4228. 





an ÜBER DIE GRENZE won COLOUR GENIE E-Kontakt } zwischen: 
‘Hardenberg... NL:.: und: Nordhorn, . Lingen, Meppen, 5 er 
: A. Goäse, Eiberhof 6, NL 7772 GM. Hardenberg, Niederlande. Eee 


ae RAUM HAMBURG ##* Jürgen Gratz, Höperfeld 11, 2050 Hamburg 
80,5, Colour Genie, Pe en Beteicbayenem, DV, MATH, 
 Fortran. BEN ; 












ee RAUM KONSTANZ war * GENIE. I+ 1. Ahwender zwecks: Erfahr- . 2 ; 
ae ungsaustausch En von: ‚Ronald ‚Stöhr, ‚Buhlenweg 31, 7750 Kon- 
'.. stanz, Tel. 77888! # Be 


26 rechts nach‘. linksi, ‚127, 191, 


e 255 Sellıe;; sie: h ın- 127 ‚verwandeln; Bei: jedem 
der. ‚restlichen. sieben‘ Stifte: muß jetzt: eine: 

zwar... von” 
2 > ; 2 £ 


Es andere "Zahl .erscheinen.- Und 


2 251, 253 und 254. 


grammieen oben entnehmen. 


A ausgeschahiet: 


u "Nachstehend: "inden: Sie: ein: Steuerpro-. 
... gramm für die: Relais, mit‘ denen alle acht 


5 . Relais getrennt, programmiert werden, kön- 


TABELLEN Be 


Belegung d des «Paralllort * SI 


_GENIED DATA 19: 


A a name = anne arme er, 


nen. "Dar Brokranm: erklärt sich selbst, Sie: 
als: alter Profi" kommen ‚damit sicher Icicht,, 
zurecht. en, ö he 
Ich, wünsche Ihnen viel Freude am Schalten! vn 
RR "Damit sınd :die Tests eh Ben STÜCKLISTE 
a sen.: Wie man: die: ‘Karte 'abfragt und an-: 
»: spricht, ‚können: Sie aus. den. beiden: ‚Pro- : 
‘Dabei gilt, die. 
Relais: werden: durch einzelne. Bits .an-, und ee 


ER Stecker, ed für: Paraleliport. 5, 
38:23, 3:KOhm 2:7 rl 
:8.x:BC 238. B, 0. ä. ERSTER GER 

8 x.ITT:400% Dioden 2. 

EX: ‚Relais, 1 mal UM, ‚6V.. 


"max: 50 Milliampere 


54 'Lötnägel \. Pie, EEEODEE 
“ Eventuell 8. x j N s1us Dioden: für Spule, ge 


1720.19 18-17:16:15.16-13.12.101098 7.654321 | 


RM. Hübben-CG-Relaiskarte 





ET 


AUF CASSETTE FÜR COLOUR GENIE 


8. 


fels /T. 


arien 


; Mühlbachstraße 2, D-5429.M 














+ 
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SONSTIGE PROGRAMME 
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a0: PRINT 
r & Sr Fi EUERUNG Br & 2 BER Es 2 
TO. PRINT! x 


ERO:: FRINTS400, 


290 PRINT" 














"Programm-Ausdrück 
‚Relaiskartensteuerung 


310 eisienlaure 
IRRRRORERROKRAN 


30 PRINT 2.0 
2 . ee = 


a 


"so PrınTeeauesecksenmsnnnernnn | 


ERRDORRRKCRRICKIKN 
"Ad: Karte: 


0 PRINTEPRINT O0 0000 ‚Ralf. 
H .. Huebben" PRINT 


100 ‚As= INKEYS$: IFAS=""THENI00 
acı ELS F 


ag N N 


150 PRINT"Von 1 bis mr ir ef) 


SITHn.s Langsam"... 


460, PRINT: INFUTTR! 


170: PRINT: PRINT. 


180 PRINT"Anzanl der ‚Schaltzyklen 


"LPRINT 

| ‚INFUTSZ. u Kai 
O.DIM zY(52#+1): Om 

20 FRINT'Frogranm-Ausmanl" 


N er een 
Ö PRINT" 

Q-.RRINTN 
OPRINT" 3, 


70: PRINT". 4. 


ÜRINT: 


500. PRINT: :PRINT: PRINT"-- 


E10 PRINT"Was“ Be SE NEE 
2.320 A$=INKEY$= IFAS=""THENS2O 00 
350: ONVAL (A$) GOTOSSO, 520,650, 800, 


|RELAISKARTEN- st. 


Programm w 
ET 1985 By. EN 


startwert 


1... Zyklus singsben 
‚2... Zyklus ’abarbeite |... ee 
PERSERESOSIREN TE se] #70: PRINT") BB ze ee 

‚azykläs simuliere Be 


0.BRINT" > Zyklus: listen':P |. 


6:4 Progranmande® 


GENIE DATA ;2%: 


H. 


380 PRINT"Letz te Eingabe in. Schri. 
tom \ 


LESZRO:; ea eten bei";PO. 
Bash 400° FRINT: 
au FRINTOARKRRRSRRnKKKn Rn | 


FRINT" Tippen. Sie A ‚fuer 
‚Relais AN und.o fuer" 


410. 'FRINT"Reiais. AUS." 
420. GOSURPIC., 

. 450 FORI=OT07 a Bee ARE en 
440 FRINTS 920, "Wert. fuer Steile";. 


I: 


450 A$= INKEYS: IFA$=""THENASO Be 
460. TFAS="1THENZY (PO)=ZV (PO) +2A1 
YGOTOSOO., BR 
FO- IFAS="O"THENZY (PO) = ZYrmaNDe 
27255=-2A1Yr 60710500... £ 
480° TEAS="A"THENGOTO21O | 
‚490° GDTO440 
.. 500 .GOSUBF9O: NEXTT. 
.. 510. PO= FO+l: BOTO420. 
520 CL8 = 


330 


\ss0 ee eine Taste 2 


um: Starten. 


‚560 PRINTEHL E koennen Sie nie 


brechen. j 

570 IFINKEY$=""THENS7O :; 
580 SOUND. I: 1922°. KARTE: AN 
3970. - FORWW= ıTOPO . 


2600 SOUND14, ZY <uWwD 


610 Z7Z= 7 Z+1: LIrZZETReLoTHENZz= =27+1 
:60T0610: ELSEZZ= :O; | 


620 ‚AS=INKEYS: IFAS="ENTHENGOTOZIO 
" 630: .NEXTWW. 

640 GOTO. 210: B Ey. : 2 
‚850 CLS: PPRINTZyKlus simulieren' 


E60. PRINT“ 1 


EB E, 


az 


88. BB! 


N BO: PRINT'E" ie” ne" nen ner ner : 
4e2yklus ‚ausdrucke | . ne” met u Ben 
e | .690° PRINT"e "ie me me ie ie ' 

EEE VERIERERE ER 
700 PRINT" üü ü0 u. vu null 


 FORI= ITOPD 
0: WERLFBENNENEL NE 
PRINTS400,." "2... 
> XX=ZY CI): 
0 :FORLSOTOZE SEES 
:IFXX-WE>=OTHENPRINT"AN "53 


eXX- WE: WE= WEI: ELSERHINTTAUS "EW 


E=WE/2 


2770. NEXTÜ 











2 GENIE DATA: 


CS 
PRINT" Zyklus Ausdrucken" 


INPUT"RETURN, ‚wenn Drucker el 


yaXX= zY<1) 


BEXXSZVCDIN EEE 
WE=128B: FORU=0107 | 
30° IFXX-WES=OTHENPRINT"an, 
WE: EEBERRINT num, eh 
9 WE= =WE/2. Be 


N 1908 by. Hihlebken 


u Er xx 4 u - 


ES NEXTU: PRINT: NEXTI- 


960 ‚INFUT"Tippen Sie Returntman 
970 GOTO210 NN i NERSEERTSEE 


.2B0.ENDE: 

ERPONXS ZY<PO) BEER ER RSS DLETENS 
1231000 IFPO= -SZ+1THENGOTO210 Eee 

b2:1010 WE=128B." Br Fr: 


FORI= LTOPOSLRINTrSChriten 15" [2.1620 :PRINT3400, Schrättnsrog" ' 


1930: ‚FORU=1T08:2:: 


2040: IFX- WE= >OTHENPRINT" 1: " 


fe EL BERR INT ORTE 


| Pe n 


Mod gel yo 
MdseE 
Mad: Sel..@ Ei: 
I 
F 
I 


vn 


Mod. Sel Tr. 
"B:="Mod.Sel-Ril:l 
A, Hachpfei} a 


‚5427 Frl | | 


 nooır 
UND1O ‚ot SaLnD7 2 





250 RL DURSKEDEUBLSTE RI NTe 
el en willst Du: kaufen. SEAN: 


verkaufen an 


N ee i 
IFM£OGOSUBLL7O:GOTO400. 


 IPMLTHENF-2SOSUBL2I0:GTORO | 


a0 L=L-Mi K=k+MXPR: GOSUB270 
” ‚COLOUR2: ‚GOSUR1279. 
M=EWK4: IFM} LTHENM=L.. 
IFMSETHENM=K 


480° ne willst | 
.. Weinsaeen "ıFRINT" Lassen max." ya. 


» BUS INRUTNNG A: a 


ei scharfer Korn. willst Du an 


550 PRINT" Hungernden. Verteiler 
SL INRUT GE IFH=OTHENS9O : 


560 IFHLOGDSURL170: 6010540 
870: IFH>KTHENF= 13 : SOSUB1210: ‚S0T054 


0 


5. 
590 GOSUR1320:M=4ın(1)=214: us | 


79MH =6413M (4) =98: GOSUB1BS 
Kon. ER=AND (16) I K=KHERKAI Ras 
DO) KK/SIIKSK-RA 


&10 Hi=INT (EW-H/4. ee 


PR IFHIX=OTHENGAO 
: 620. HT=INTCHIKXRND-(O) 


INT (EW/ZURND (0) +1) 1 PO=PO+PT 


630 EWSEW-PT: ZU=INT (EW/2 ORRND (Od + 


1): 20=20+ZUs EW=EW+ ZUR 6070670 
40 HT=0: IFH2>OTHENGSO a 


650 ZU=INT (EW- HZIIRND (0) +1) 1 20=Z2 
. O+ZULEEW=EW+ZULPT=INT (EW/ISKRND(0) 
+) PO=RO+PTHEW=EW-FTIGOTOL70 
660 ZU=INT(EW/ZKRND (0)+1)320=2042 | 
ir EIRINT Enzo | 


719: IFJ: BEE 
7 ‚COLOUR WS: PRINT"Warnen muss ich 


)EHT=HT+INT 
: CCEW=HTI/S) ı HO=HÖ+HTHEWSEN-HTEPT=. 


wer IFZU=ITHENZU=2 HEeENtnzOn20 
Ei 690 IFEW<ATHENIA7O SER 
"1700 PR=INT (ZARND (6) 4 Imsetsins2e 
"THENS4O; EELZ BE 


Sorhehzza.. a Bu 


Dich: num: © ‚Herr, dass! 


"730: FRINT"DU nicht ‚den: Soettern 9 
. leich. ewig kannst"... 

RAD: ‚FRINT"ver\ 
|. 750. PRINT"Ereilen kann: der: Tod Di 

ev: num: an in ERINT" jedem Jah 
m RE Fr s ee : 


eilen. auf dieser He 


760 Maöı MU) =B01M(2 EB M(3=107: 
M(4)=71:M(5) =95:M (6) =274 sosuBıeso 
-:GOSUR14301G0TO840° Ba 
"779: IERND (LO) >J-2OTHENBAO 
‚780: COLDURS:FORT=1TDAO: PRINTOG! 


NEXT: ‚PRINT: 


780 PRINT"Ereilet hat Dich Dei 
"chicksal‘ nunimt 2 
800. ‚PRINT! Jahrers R 
.chaft: TEN 
BIO: PRINTLFORT=LTDAOLPRINT"g N HNE 
lan FRINTSPRINT. EISBENEn, 
820 M=274M(1)=3 B1:MD)= 


\ Deiner Herrs- 


F 320: MH =2 
54:M(4)=391:M(5)=320:M (6) =254:1M(7 


 )=285:M(8)=240: M (9) =381:M(10)=285 
„.3M(11) =2541M(12)=240:M (13) =254: 
.19)=404:M(15)= i 


381: MIO) =38i 2 
30 M(17)=320:M (18) #254: MAN=3BL 


4MK20Y7=339: M(21)=320:M(2De404:M(. 
V2M=381:M(24)=320:M (25)=254:1M(26) 
|®4041M(2 a 


Bau. FOR DURSI ‚LS: FRINT 


850 COLOURIL: in 
Ich: berichte, MON. dem Jahr"; J;"De 
ner. 
5.860: PRINT'Herrs 
6 nt" Be Et 
870: FORI= 

880 COLOUR 
Die Ernte 


art ueber Baby 


3 PRINT® Horgen, insgesamt" ERAA 


4"Scheffel.' 
"900° ‚PRINT!- "sRas "Schetfel #rası sen 


SGPRINT": die Ratten. 


so PRINT"-Es sind. "Kg "Scheffel" 
gan DRIND. Korn. in..den:: ‚Speichern, 





s:lyphe, ein 
1190 Nasın(d)=1601M21=e551n (95 | 
..2rG05UB1880. . 

1200 RETURN: 


& : 24 GENIE DATA_ 


940 PRINTI="PTE"NMenischen- starben 


"an. der”; 


95 50. ERINT.. Pest und" HTz"Hungers. 


960 PRINT"-Die‘ Stadt. hat ‚Jetzt"ip 
:RINT" "JEW "Einwohner." = Pag 
970: FRINT"-Dü besitzt"jLy 
980 .PRINT"Morgen Land.»" sE 
990 FRINT"-Ein Morgen Land. kostet 


a "GPRI"Scheffel., 
1000 -FORI= ITOIOOOENEXT.. 


i 1010 COLOURZFPRINTSB42, "Willst Du. 


© abdanken: To: (daD. 2 
1020. A$=INKEY$: IFAS=""THENLO2O- 


1080: IRnac an) OPaTnENBBSUB270100 


KTOSSO-:2 
1040 608UB1320: COLOUR1O: PRINT" 


2 Duchast "dr "Jahre geherrscht !" 
1050: PRINT"Siehe: ob Du ‚ein ‚ter 


© Herrscher warsts" 0. 
1060 BRINTNEEE 2 


EEDu base) den. Karnvarrae a Stadt: 
SEP ÄAMNE PRINT "ABS (3000- K);"Scheff 
BE el Er | 

1070. IFKSSOOOTHENPRINT" vermehrt." |: 


-ELSEFRINT"vermindert.!" 


1080. PRINT"="JABS(1000-L) 1 "Morgen. | 


"Land"ıPRINT" hast Du "5. 


1090. IFL>=1000THENPRINT" erwarben. 
N "ELSEPRINT"verloren." 2 
:1109..PRINT"-Es kamen: "5204"Leute" | 


a PRINT" in Deine Stadt. 
‚1110 PRINT"- ""1HOj "Menschen starbe 
“m: 'Hungers, " ne 


1120 PRINT" und"3rog"an- der, Pest... 


iso, PRINT"-Insgesant. hat sich: af 


e Bevoelkerung. 
um's ABSSEW- 400%:."Menschem: "HH IFEW 


>1OOTHENPRINT" vermehrt. "ELSEPRINT 


.Nermindert." 


ne COLOURSSPRINT" 


Segendeine: Taste an 
14150 'A$=INKEYS: IFA$= "NTHENLISO. 


2.4180 60101920 5 
1170 COLDURS:PRINTS640, STRING (12 


0," I EPRINTEA4O, Ma. , 


1180 PRINT" +++++ Unbekannt: ak. mi 
‚Hierag:! 


"er, 0 Herr ,die"sPRINT" 


1210 COLOURSI GOSUB12701 SOUNDIZ 


OLPRINT"++++r: Bedenke Aachmais, 0 


Herrscher," 


tdruecke i 


1300: PRINT" 
Das ist: das: :: ee 
4510 COLOUR2 LPRINTAPRINT" a 
ecke: irgend eine Taste)" ä 
2 As: INKEY8: IFAS=""THENISZOELS 


1220 'COLOURS:PRINT"DU. hast nur 
:ONFGOTO1230,1240, 1250 er 
1250 PRINTK} "Scheffel Korn!"isoto 


1260 


1240 PRINTLI "Morgen Land!" 607012. 


60 


1250 FRINTEWI "Untertanen!" 


1260. SOUNDI12, 200: M=1:M(1)=10003 so 0 
‚SUB1880: :LL=-1 RETURN 3: Ma 
1.1870 TFLLTHENFORT=1T020001 NEXTILL 

: =0. u : 


1280: SOUNDI2 ‚19 


1290 Maiım(1)=1281 1 GOSUB18805 PRIN 
"TE640, STRING (120, "© ae 

1300 PRINTSEAO,""E 

43810. RETURN 000.00 


1320 CLS:PRINT- 


ASSO: COLOUR LAPRINTUKRRRKKERKKENE 
ERROR 
1340 PRINT"#"43COLOURB:PRINT" HA 
BABY L 0 NE: 


MURSAB:TI. von. 
COLOURLIAPRINTE® RSS 
1350: BRINTIETSACGLAN Sarnen. Du 


"43 COLOURIT: PRINT"E" 


1360 PRINT"x*" 3: COLOURIO: PRINT" Eu 
n.Manegement-Spiel: fuer. Bauern MM: 
.d. "23 COLOURILIPRINT"K" ET EEE 
E 1370 PRINT"*"}3COLOUR10: PRINT" ge 


„Kaufleute: zugleich ; 
4 COLOURLIHPRINT"E" u u 
1380 PRINTOISEREKBUNEEEKE HE 


 BRESREREREREHKRISRULERLOUNG 
1390: PRINT RN 
0 HAMURABI a 


iaod. Ma6ı MI =3811M2)=190: ee 
‚&0:M(4)=170: MS) =1603 M(&)=190: sos. 

‚UB1BBO een “ 
"1410 RETURN. 


1420 COLOUR2 a ke 


Li FORTE LTDSOODENEXT. 


30 PRINT" Wenn Du en 
ae dann"... 2 Ei 


1440 PRINT" 
"pn Knopf Een 
1450 IFINKEYS- 
1460 /CLSIRETURN 0.020. ls 
1470 SOSUBLS2ORPRINT"DU hast es 


eschafft ti" 


4480 PRINT" 0000 EEE RT 3 
"DEIN VOLK. IST. VOLLSTAENDIG use 

:OTTET. I" en] 
1490. Me34Mt1)=1074 Massen“? 


:G0SUR1886 


KEenDEen 








= 0 BOSUBLF201CDLOURIO 


a, PRINT"Willst Du yergronssen 


"Dein Reichs... 
"PRINT"sa kaufe Känd‘ 


"PRINT"Bedenke sesbch, di 'Me 


LH des. Korns. ist 


so kaufe... 
‚1590: PRINT"nichts 


620 PRINT"Doch merke, 

Land ist nicht so. 

ao. FRINTIarame} , 

Br ch: der ‚Goetter:: 

.1640% GOSUR1420 = on 

1650 COLOURIO: PRINT"Wi 
ernten, 80 musst, Du iR 


1680. PRINT" Bedenk 
Morgen‘ vier nur: 
1690 FRINT'"kann‘ bes 
einer. Untertanen. 
1700 FRINT": = Een 
Willst: Du ein user 
5 ‚Herr = 


Zeitschrift für den SINCLAIR at. 
Verbindung, setzen. ; 


ehrift für alle ( 





_GEMIE DATA 


1730. PRINT"OLUerKlien sind und, au 
ieh: gesund... R 
23750 PRINT, Be 2 
EWELLSt. Du jedoch vermehren die An 

TEEERaNnL-n N 
31760: FRINT"der. Euerger: Deiner Sta 

dt, so.teile jedem"; 
371:270: FRINT"zu. der. Schetfel 

Dein. Grossmut wird"z 0.0: 

1.1780 FRINT"sich Miederspiegein 


Zulauf in Dein: 


1790. FRINT'eIgen Reich. 
©1800: PRINT" 


et Se 
ae PRINT"Wenn Du hast, versta 


wie:Bü:ein: 


1b2o- PRINT"maechtiger, und reich 
er Herrscher: wirst... a 
183 30. FRINT."s0O drueck ‚hernieder 
Ehen: langen: ‚knopf.. E 2 
1840. FRINT"an dem Geschenk ‚der | 


erstens vor: “ 
185 FRINT"dem- Du; wohl uitsmet- 


as Ans INKEYS: .IFAS«E} >" "THEN1B6 
>1.:1870. RETURN: ee ER 
1880. FORT=1TOM a 
„1890 M(I)=M(1)/256. S Ya 
1.1700 SOUNDO, 256% (MED -INTIMEL) 
 SDUND1 INT (MI) 2SOUNDIS,O. 


1710: FORII= -LTOSOSNEXTINEKTIFORLI= 


>|. 1T0200: NEXTHRETURN. N 
5.1920: COLOUR? :CL83 :GOSUB1 320: PR NT! 


Nach» ‚ein Spiel. = 


1930. A$=INKEYS: IFAs 


|. 1940 IFAS="J"THENI7O 
1730 IFAS«> N" THENI9S0E 








2 GENIE DATA 


* MANFRED HENSEL 







































En angenehme Re Programıe ‚zu schrei- 
"ben, -ist.. das. Anketten einzelner Programm- 


Be reichen ' Programmbibliothek. 


ML "MERGE, ‚sofern man hat. 


u schen sicherlich die: Zu-Fuß-Methode:. 


...besetze . den. 


5 vereint. 


.zentration und‘ hat.den‘ nicht '' zu.: unter- 
:schätzenden Nachteil, 








Zr den. 


Es: "umfaßt zwei‘. von: einander: getrennte 
soll: .Mit: ihr:"können' aus‘: vorhandenen: Pro- 


Be .. zusammengestellt werden, Zr, B. ;-- SAVE 
..2%",700-900 schreibt. das ‘Segment von Zei- 
lennummer : 700: bis'900..mit:dem ‚Namen "x" 

auf -Band.. Das Mutterprogramm: wird ‘dabei 

nicht: verändert. Die Zeilennummern können 
‚wie beim. LIST-Befehl verwendet werden, d. 
Ben es sind ‚folgende Ausdrücke SElaUBER, EEE 

22, SAVE IX" a 

u. SAVEX", zi- 22. 

BESSNSAVE-IR ZI STEE 
SAVE "X",- Z2 


B SUXnE Ü 













einer .Betriebsystemroutine i 
CALL  1BLOH). Diese..liefert. von der ersten 





eenu ni 


und auf dem. Stack: die zweite : Zeilennum-: 

:mer. Von. letzterer: wird mit: CALL: 1B2CH EEE 
die‘ Zeilenadresse. ermittelt! (genauer: die... 
-. Zeilenadresse der. 
denn. man. will 
.- Zeilennummer: 
‚Routine: liefert. beide Werte.). 


» blöcke aus einer.mehr, oder weniger: umfang-... 
Hierfür. ver-:: 
wendet ' man: Befehle. wie: ‚APPEN D: ‚oder 


© Den: Galsur Genie: Besitzer. hat: nichts = 
selbst. :Wenig- Programmierer. kennen: : 'inzwi-. 


Man .belegt den. Programmanfängzeiger mit“ 
2. .dem: Wert des Programmendezeigers' (minus. 
2): ‚lade: mit..CLOAD das neue Programm, 
ez ‚Programmanfangszeiger mit. 
dem’ alten Wert ‚und schart: ‚sind. ‚beide: ‚Teile = 


Na ‚und Byte für: Byte: des. Programmtex- 3 


‘ denn im Regelfall müssen noch zwei Byte 00. ei 
.. hinterher. 'geschickt‘. werden, um. .das Text=....: 


Diese Methode: erfordert erhebliche Kon- .. nahme‘ ist nur..bei SAVE!'Name" und: SAVE 


‚daß. das neue 'Pro-- . . zum: Textende aufgezeichnet. wird... 
gramm 'immer- nur an das alte angehängt 
werden. kann und zudem irgendwelche Zei-: 


| ‚lennummern . ‚aufweist, nur, ‚nicht: ‚die passen-, "nungen und können. deshalb auch mit CLOAD 


| eingelesen werden. Sollen sie jedoch zu ei-' 
' nem: Programm. zugeladen werde, verwendet —. 


Das Yorliegends an bieten. Auni: = 
man zweckmäßigerweise den. Befehl MERGE. no 


mie ‚ca. 380 Byte einen ungeahnten Komfort: 


 Funktionsblöcke, : von: denen der Kürze .wegen E 
die: SAVE- Routine zuerst besprochen werden 


,grammen interessante.'Teile 'herausgeschnit- 
ten werden .und ‚zu einer Programmbibliothek . = 


£ gramms: (im folgenden : "das. neue ‚Programm! 
3 genannt) ‚beginnen soll und:;ST; die. SEhEItEr BR 
Weite der ‚Zeilennummern. re 


i sche aufeinanderfolgen: 


nn u, ‚Einfügen. in den alten Programmtext 


"SAVE. "Xu allein entspricht dem Save Um. das: Maschinenprogramm. möglichst: Kon 
& Die, Angabe des: ‘Namens ist wie "bei CSAVE 
"zwingend: vorgeschrieben; auch hier wird nur: 

‚das erste ‚Zeichen ausgewertet. . Folgen: nach. -. 
einem. ‚Komma. weitere ‚Parameter, ‚werden... 
‚diese als 'Zeilennummern interpretiert und in. 
"ausgewertet. : 


und. ;RENUMBER enden. beide nach getaner 


von. Zeilen‘. geschieht ‚überhaupt. in dieser 
Das würde bereits: nach CLOAD zur: ‚Meldung 


 Zeilennummer die Zeilenadresse, d hr die READY, und zum P Kogtammstop führen 





isc| Ien 


Speichere bei der. die Zeile beginnt) \ 


























darauffolgenden‘ Zeile, : En 
\ einschließlich : der. zweiten... 
abspeichern; ' se „benutzte 


Nachdem. nun: der: ofen, Er ee % 


tes auf "Band. aufgezeichnet sind, muß noch 
die Speicherstelle "FLAG" geprüft werden, ©. 


ende: auf. "Band zu. kennzeichnen. "Die Aus- 


"Name", ZI- ‚gegeben, da hier ‚sowieso bis. 


Die ‚so: erzeugten: Brogrammbänder and u 
absolut. ‚kompatibel ...zu....CSAVE-Aufzeich- 


Hier. sind: folgende ‚Ausdrücke erlaubts; 
- MERGE "Name", Z, ST 


'MERGE "Name" er 
Merge "Name" 


Darin bedeuten Z die en. mit Er 
der. die erste :Zeile des. nachzuladenden :Pros:: 


Daraus | folgt, daß hier. mehrere Arbeits. “ 


‚1. Auswerten. der Parameter RES 
:2..Laden des neuen Brogtemms. BirSRER 


. Es 'Umnummerieren Babe 


zu „halten; “werden zahlreiche: Betriebssy- 2 
stemroutinen. verwendet, von. ‘denen: ‚der sog... 


""Haupteingabeschleife" eine zentrale Bedeu- : 


tung: zukommt, denn .die:Routinen: CLOAD 


Arbeit: in. dieser: Schleife und: das. Einfügen 








N 


BEER: "Glücklicherweise existieren äuch hier die Be 
sog. DOS- Exits, mit. "Return! kurzgeschlos- 
‘.sene.. Aussprünge ' zur‘ Erweiterung. Kg Ber 
die Zeiger. für. ‚Textanfang. ünd.-ende mit.den: 
alten. Werten, ‚verbiegt: den: DOS- -Aussprung 
der Hauptschleife® auf-INS2 und schließt den. 


triebssystemes und Interpreters. En 


3 So ergibt: 'sich,; grob: skizziert, Kogender 
n Beperammtahtplanı. n ä 
Der: 'Programmname wird, wenn eingegeben, e 


‚ausgewertet und: sein erstes. Zeichen 'zusam- 


sie Wied: Errsch: 
eichert; 5 


es. alten‘ Prosränme ermittelt, um 10: 


erh öht, und. als ‚Anfangszeilennummer: ‚abge- 


legt. ‚Nun: ‚werden. Textanfang und -ende des 
alten. ‚Programm ‚gerettet, das. Textende um 
‘siehe. unten) und. als. 
i ‚neuer Textanfang. abgelegt. ESSEN, 


255. ..erhöht. (warum: 


Bevor: nun::in die Routine: 'cLoAD ge 
sprungen ‚wird, müssen :noch zwei. ‚NYorkentun. as 


gen ‚getroffen werden: 


"Am. Ende ‘der. Haupteingaheschleife. wird der. 
....DOS-Zeiger. auf die nachfolgende: "RENUM- 
Routine gerichtet, so:.daß nach ,beendetem.' 
} "Ready" 2 2 


Ladevorgang ‚nicht ‚die „Meldung 


zeigt nun. Auf: das. le INSERT), 
‚zwei. Depp 


‚denn. .die alten. 
bereits angerichtet, 


jo nach ‚einem 3 


E = hier durch ORC ä 


__GENIE DATA 27. 


liche Weise: nn 


"Zunächst wird de ‚neue Textäntang: im: "in 


dexregister ‚IX ‚abgelegt, dann‘ .belegt man: 


DOS- Aussprung . ‚für. die. Fehlerroutine 'kurz;: 
Pro Lammparameten. sind 


ne: telt. und De 'Zeilentext 
‚system Routine in: den Uc 


ren richtig eingefügt, 
5 Zeile: über, die Tastatur. eın e 


‚alte Text. und‘ 
:; Zeile mitsamt 


a ;stand.; von: 255. ‚Byte zwischen ‚altem ‚und 
„neuem Text eingefügt ‚worden ‚wäre... 


‘So Kann: ‚der‘: Anfang der nächsten einzu 


Pe ‚Zeile. ‘ermittelt. ‚werden: und. der 


Vorgang wiederholt sich, bis: die ‚Routine 


-INS2 das ‚Ende ‚des. neuen. Textes erkennt. # 


chen Bi ee ‚nach 


..xten: können etliche. Sekunden 
. Erscheinen ‘von 'Ready' (nac 
dem: Ergmpt ‘(nach INSERT) ‚ver 


geringeren Brogrammieraufwan 


"Man: "beachte: "alte "Zei 


z neuen. Zeilen: gleicher. Zei 
schrieben! ‚Soll... das 
empfiehlt es si 


| Anfang des. M schinenprogramms t 
‚B000H ER (d. h., 


werden mit se NZ 













































. 


on 





a GENIE DATA 


“ Program RETTEN m IBCHEN 


2.85 BUFZ. © 

"OBURT 
22295. BUR4. 
0 FUhE. 


110 


"ERBE: "an", Zi: sr ‚UND- "SAVE all 12 FUER 


-COLOUR- GENIE' 16K/32K ‚UND. CASSETTENBETRIEB. ..; a ; 


CI MANFRED HENBEL, :5000 KOELN 91, NERNTGENSTR. 23 
ORG OBOOOH © > 2 
© EQU 33A0H 3 


SERUM... © 
um 5 
" ERU-BUFSHZ © 
2 EQUBUFS 
INT. LM, MERSE 
. DB (lach, HL: 
ED. HL,SAVE 
‚AD (4AIH), ‚h 
© 9.066 


LD h ;6: 
"JR 2; ki SE HM DAEN. Li" 
"EB A,{hl) = ee 
op Zn 3"Konma 9 El 
AR 
RL EN, Er 
:: »CALL:'2337H ;*Filenasen auswerten"  ° 
= PUSH HL ©: a 
„CALL- 2A13H 
POP HL Ar 
"2: DER, (DE) it. Zeichen des.  Filenanen” 
En 
SEE RL "und Nicht= Verihyt 
=. PUSK: DE “j*abspeichern® 
"U A,.(HL).. ’ "eitere Zeichen?" 
RA: en 


EP 20H 
":JPE NZ, 19970 ; 
© EALL- TESBH 

AD = 

en STORE. 

Rz, team; 

LUD (BURN), BE 

EZ EBD 10. 
DR, (HL. An 
RAN 

rl iz. 


3"Komaa?" 2.5. 0 
‚"neins5N- =ERROR" 
"Teilemnr auswerten". 


"venn 6, dann Et- "ERROR" = a 


ex 2. 
IP NZIITR 


E LD: A,l 
EEE era u 
FEDER, AESAH. 0 7; Ft- ER E 

ED. (BUFZ) DE 
. LD:.KL, (A0AR 











er 


Ansporn ın Ds 


ae weiteren nina 2 


ET Ta 


17, 860.5 5 
870 LASTHR 


IR l, LAST" nein; letzte teilen. suchen. 


or schrittwite angegeben 


CAD. iessn 3’Schrittweite eraitteln! a 


ke Teitpointar. min. 


1390:2,: 
600. 
E16: :: 
620. 
ug: 

630: 


RR 


En 
»::650 


655. 


660: 


5 


1.670 . 
680 3° 
1.690 RENUN 
700° 

m: 
EA 
0 
1... 


750 
760 


780 FEHLER 


FE: 

&b: 200 
"810 
820. 


830: 


850 


872... 


a 
‘974 uEEh, 
BEE no 
5.878 2.2, 
[2.900 
PEN L 
EEE. 
2293057. 
940 
ER: 
LTE 


70: 


PB 1 
IR 
1000 : 
1010 an 
1020.57 
4030. 
1040. 
3050. 





AB HL, LHOFAH) 
DE ABUFA ALS 
1D:0E,255° 
- ADD. HL,DE 
LD (A0AAH), HL; 
OS D-HLAPEHLER 


ELDER ORSH EEE 

SSR. (ACH), Äh: 
= LD-(41B5H), A: 
ld RL, RENUN 


op zum 


LD HL, IBUF)} kalte Tentpanter u und“ 
0 LD HAOFR) HL 
SD HL, (BUFD 
U CROAIK) HL 
 -LD.A,OCHH 
-° - KD-CHACH,A 
SUB CABSHL, A“ 


an HL, (A0raH) > 
INE.DE 
NE DE 


EEZLBDE,0 Er 
RL 


>: BECHL 


SIERT ERE 
DECHL © 

OR AH 

FESRINGEN RE 


SINE HE. 
"[D Eh) 


SEM. 
Ei Hl 
AD @UF2) HL 


& ‚neuen Textanfang nt W Fi en 
"Abstand" a 
Fekinie 


ED’ (41ADH), HL 





LD (A1B6h, HL; 
POP DE 5 ;"Filenane urunek® BEER, 
Hund. nach LOAD" je ee 


/ _ — 
SO LDEHLSINBERT 0 
“-LD (41B6H), ‚HL . Be 
PUSHIN 2 
LBHL, urı) 
SE PUSHCHLL = BER 
a . LD. DE, (BUrZ) jeschrittneite vorbereiten“: LEEREIEER 
ee, za 2 
120.5 








;"Zeilennuaner und & Be 






. ; "und nach RENUNBER". Ei 
Sta restaurieren" 
LD.DE, MM S 


RSTIBH 


DEC HL 





DECHL 





INCHL:: 
INCHL. 





INC HL’: 













u us Sad ne ainfbch: bei 
Be "stellen :Sie. beim: GENIE. DATA. 
Ti ine _ VERSANDSERVICE: ‘Füllen Sie ganz ein- 
fach .den für Sie zutreffenden Bestellschein ‘aus, kreuzen : 
N Siea an, ob Sie Versand per Vorkasse. oder Nachnahme möchten (Abos nür' 
per.: Vorkasse); und: unterschreiben Sie..Dann brauchen Sie’diese Seite nurnoch aus der. : 
GENIE DATA herauszutrennen und an uns zu schicken. Einige Tage später. halten Sie bereits die.ge- 
wünschten Artikel in Händen. Sie: sehen, wir. machen .es ihnen leicht! Den: ‚ausgefüllten Bestellschein schicken: 


Sie bitte.an: Fa. ‚Heinz und. Ralf. Hübben, Mühlbachstraße 2, D49 Marienfels/ Ts. ‚Versand ins Ausland geht = 
‚nur per Vorkasse! ” 


. ABO! BESTELLUNG 
ee (Abos: nur-per u) En 
Hiermit bestelle: ich. “Abols) der. Fachzeit- 


schrift: GENIE:DATA.: Mir ist: bekannt, daß ich‘: 


das: Abo. bis. sechs Wochen vor "Ablauf schrift- 
lich:;kündigen: kann.: Der: Bezugspreis beträgt in- 


.nerhalb..der.: BRD: "nur: 48;--"DM: nel. Porto’ .und: 


‚Verpackung. Die: Bezugsdauer : verlängert: sich 


nach ‘Ablauf. des Abos um:.weitere.sechs' Ausga-. 
.ben;, ‚solange bis ‚gekündigt wird., Den Betrag von. 


.48,-- DM: habe: ich: 


6) 'Auf:lhr: Postscheckkonto 242072- 606; Ffm. 


= überwiesen: Ü- 
OÖ Per. Scheck ‚beigelegt: - 


Zutreffendes bitte ek ee 


Mit. Ihren Beslingungen erkläre ich mich einver: 


Üntersenrir $ 


| :SOFTWARE SERVICE BESTELLUNG 

2° Hier. erhalten. Sie ‚Programme, die bereits inder 
:»GENIE DATA abgedruckt wurden.: Wenn. .‚Sie::; 

keine: Zeit ‘oder Lust zum: tippen ‚haben, ‚sollten 0 


2 Sie.dieses Angebot nutzen... - 


»:Schein:bestellen. 


“ wo u un 
_ PAKETBESTELLUNG © 


i N, 
x Im Paket bestellen können Sie ewalle d drei Arti- 39 z 
x  kel..Diese. Artikel’ sind entweder nur Programme, .. :% 
: ‘oder: zwei Programme und: unser Colour Genie | 
A. Buch. :: Auf: jedes‘ Paket Bnahen ‚wir. einen. 
ni Nachlass von 25,- „DM! 


ci Artikel En 


REES 


1 
BER 


ERERE 


or 


BE Versand bitte per: RE NEN, 
üs.. O Vorkasse | 
n 2, Nachinahme (Betrag plus 420 pm Porto 


EX ‚Ünterschrift Fe 5 i Datum. 
\: Der Nachlass: von 25, = - DM wird: von uns: 
A abgezogen! Ei H 


N —_ an 


Auch: unsere nüehe. können Sie mit diesem Be 3 


Bi 5 Ang. ‚Artikel 


Mein Absender. 


Tragen Sie hier bfkie deutlich’ ein, :an:wen die Bisseltüng gelie- 
...:- fert werden: soll. Bei Vorkasse vergessen Sie. ‚bitte nicht, Ihrer 
Bestellung: einen ‘Scheck beizulegen. Versand.'ins Ausland 
kann. grundsätzlich nur: per: Vorkasse erfolgen. Addieren Sie: 
dann zu der Gesamtsumme Ihrer Bestellung DM 5,-- für'Porto : 
und: Verpackung und Iegen Sie bitte einen uro-Schack beil, 


— (Nur für Ausland N 


, Land, PLZ, & 


"Batüm ünd Unterschrift lühir 18. fahren ein Eiern 


2 
f, 


2 Semdans Sie diese Bestellung an a 
Fa. Heinz und Ralf, Hübben, Mühlbachstraße 

















GEMIEDNTA einkautsführer 


BO BEEITO 


SET: 


POSTFACH 2105 
"5205 ST. AUGUSTIN2 
TEL. 02241.28077 
= TELEX 889702 


GENIE- Fachhändler 
.Sandkaulstraße ‚84/86: 


"5100 AACHEN ‘| nar Itung u. offene Posten- | 
2 | yarwaltu en a Bao6,- 


00 Uhr bis 13.00 Uhr‘ 
00 Uhr bis 14.00 Uhr 


l.. .. (06747) u 


Sr: 


Dar EEE 
EACA (Videogenie) 
© SANYO { Laser) . 


Iburgerstraße 17 ; 
Telefon 0541 k 588660 
soo. OSNAB R Ü c 


: Softwareprodukte: 3 


pP eipherlogeräns u. Zubehör 


KAYPRO_ 





























a 22 GENIE DATA 


el el 
en 

BE 
BO 
EP 4480:, 


1160. : 


A 
er 
1200: Inst. 


. : ‚1210. 5 


1380 E 


1340. Ing2 


E30. 
NE 0 = 
EERSRÖLEH 
EIS 
BL 
EA 
Zn N Were 
140° en 


1450 


1 HL, UFD) jralte Trainer ernaurn® 
3 KDt4OR4H) RL... ee: 
‚ip HL, (BUS). 


Sa kB. HL,ING2. 
LD-(M1B6H), HL nt 
CB; ACH ferbfangntie RT, 

5 ; 20 (ACH, A 1ranehbeN Re 


ER en wo. 
Er INC HL} "Zeilennunner ueergehen 


rn aurEn Tat i in 10- Buster einranm 


BE, 003) nach. DER Re 
SSERERLIHE, Saoazk Buferanfang nach we ar 
BEERSSBÜRE: j ee, 

©: PUSH. Ar. u 
; IP LnmaH ride antun 


we. Be: 
=. L,tIX0) eigen a auf‘ die" ee 
LE HrtaHl) inaschste eile holen“, er] 
PUSH HL: ; 
2 TPORS RE grund: nach 1 e Eı 
LD A, (HL): j neuer. Tat zu Ende?" Be 
EINMESSSTSSEHERET ln 
FORAHEI ESS EEE: 
SÄR.NZ, Inst. ansin maltersenen 


°{D: Aue, Ä F i 


2000 1"Begim der SAVE-Rautinet an E 
TR En a! 
OS PU HL a Eh 


AD ABUFLISHL 
ONE, (Aorsh)j" und: Texkande vortanetamnt. 
D (AUF ‚HL & Pe 


A IFLAS,A 
352: POP HL: 





210. ee PUBEL ee 
1.2190 : EST ERALE ZAHN 2 
ERDE TE EEE BORN 
1.2190... .2 0 PUBHDE  j*und IZeichen retten" 
[2180 22200 AuHL) j'weitere ‚Mngabe?? EEE | 
ARE: 


LD_(A0F9H) „HL 


EEE ERBETEN SF IRT ‚AUFZEI} "nein, gänzen Text: auf: Band" 
2280.50 2: :0P.2CH 3 *#olgt ein: Koana?" 
Ei ee IP NZ, 17h N rein, SMERROR! 
[222260 .RST 1m 3 
FE 2270; E Be EERESES RBIESFE 
„2280 -- Be CALL: 1B10K ; eilennunner(n) auserten? 
=” 1. 2290 nie AD BURN, Bi ee 
2300 | SEHEN, DE 
allge. Be 
32320 2. 52 > LD HL, rer v2 ZeilennunnersToxtande?* . 
ER ERBT: IH | 
230 ET EEEEIRNZ, We: 4 "nein" 
2350 - 7 5 rs AIIEI 3 "at . 
230.5 ee 
En \ 370.6. = ae ki ya 
2380. ee, (FLAD), a Sc 
239 ; a3 
"2400: ST EZCAUL: 12H. 
2410 ©: JP NC,IEDIH 
f 1 g (BUF2), We ER 
2430 AUFZEI.-. CALL D2sFh "Vorspann aufzeichen“ 2 iE 
22 [57244625225 2-POR BE: 
>20. LD- A, CDEI  eFilenanen" nn 
20 3, bALL:OZIFH 1 aufzeichnen a 
12470. 2°. -UD-DE,ABUFLI Text van 2.7 
2480... a HL,SBUF2D5" bis. * BE Ben 
H 210 Loop LD nun he Auer ie: atzechnen. N R 











INC HL 


u Eu Ing" "teiiennunmer" © 





LD-A,0C9N - 4*Hauptschleite wieder“ sl 





a 2 SINE: DE Y 
3310... 22..Chkk. D2IFh BE 
2320... iR ah; 
28530... 
El 
1.2560 u. 
:1::2990-.2.55 ee 
:4.::2880. ZEIT FIR NZ, n EEEEEIEE 
Re. | SE (5 A EEE 
12600 2 ALL pzırh y inch 2” ” Mitarb a 
5 2610- ie ll G2IFH- a 
2620° 7 -JP-LAIBH 4 sure zur Hauptschlei 
aM ar END. INT. EP . EEE 


RET.: 





Ld ram it Tetantng 


AD Arf:- 











sr Ba. 2537 min auswerten“ eo 


GELEGENHEIT 

ne a ee - GENIE 16 
nei s GENIE- .16B mit zwei 
Er EN ME viel: Software, zwei ' ‚Diskettenlaufwerken,. 
ne ‚ce "22 Disks, je800KB, insehr - Perfect Calc, Perfect Fi en 
nee... gutem Zustand nur. den, Pascal en Tür... -: 
ce | 

5 Zuschriften „Öltte.. unter = 

.ehittn, 1852: an n den n Verlag. 









MARCUS UNGER 


Oder: Wie schwer ist t eigentlich 
struktur riertes Programmieren? ?. 


ie bereiks: aus: a 'Unterüberschrift 


»siehtlich: Ast, :handelt. es ‚sich bei dieser. Se “ er 
fi keinesfalls-um Propaganda gegen. italienische. . ::. 


‚Teigwaren, ' sondern vielmehr soll mit dieser 


„Serie einer: weit: verbreiteten: Unart, dem 


„Hacken! (das einfach- drauf-los- -Tippen, ‚ohne 


rechte; Meer das en ee 


können - soll). 


; ‚drauf los tippen. Bekondai 
' ist dies: eine ‚weit, verbreitete 


reihe en auch indeh 
ee ei He noch . „ÄDSSEHDBT 


Bi ‚grammieren, | dene eine. einmal 


. ‚Unart: kann man .sich. nur: schwer wieder ab 
HE gewöhnen. Wozu als viel: ‚herumquäl € 


SERESSINE den ‚verschiedensten Compt er. 
Zeitschriften. ‚war ja schon einiges zı 
"über. die verschiedenen. Darstellungsmögli 
..keiten ‘von ‚Struktogrammen, aber. .eine: 

5 a 2 wie ‚mit, ‚dem ek ‚Strukto- 
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 IBitdschirm‘ löschen En 
Registerlöseten Er Bf TFRK ı ger funden> = 
: NEIN En: & zE 


Freien Komunikations| 


Es Rh "Kanal IFKK] suchen. \: : 


"Drückerüber”: 


bien: ib F\ Ren)‘: 
über Kon. % ‚DE. 4 kurzschließen 


. /.fusor. Zurück an, 
‚Anerator. 


Tastatur abfragen. 2 en 


Dat a ER Ehe 
gerigen Arch. 


| Ircher mit GC: 5 
sprengen. | 


ölche ib, I es beinahe u 


ENTE n,. (z.B. sehr "maschinennahe ; 
= . Sprachen ‚wie Assembler). ‚Einige. ‚Leute be-: 
‚haupten. zwar, ‚In; Basic ‚sei ‚strukturiertes 
Biogfanimieren, ‚unmöglich, ie 





; a6 GENIE DATA. 


che, ee es "auch: in: dieser 


en grammierer 
; ‚Befehle zur. Verfügung stellt. 


‚gewisse Grundstruktur 'aufweisen.. 
vorkommen, 
Grundstruktur sehr‘ klein ausfallen, oder so- 
gar-ganz entfallen. Aber. 


Grundstrukturs 


Vorbereiten: zur: _Datenaufnahme = a 
Bela imensionieren,. . Konstänten 
©. .nieren, Speicher. löschen oder. 

A stimmtem Biemäster füllen... ı USW. : 

























"2.2: B..DATA- -Zeilen,.: oder: 





= : Däten. verarbeiten (Programm. Ausführun ). 
„Jetzt wird:dereigentliche: 








. gearbeitet x 


Ergebnisse:und' De aus ‚eben & 
ie auc 


Tabelle, als: Zeichnung... USW. 





Das | wichtigste. 





tung. ‚des: ‚Programms ‚am Schreibtisch. ‘Man 


‚terziehen.: Dies istein: 'sehr,. sehr‘ „wichtiger 















“Sprache: zu :versuchen. Schon allein deshalb, : 
weil unzählige Homecomputer vom 'Herstel-: 
: ler‘ mit’ Basic ausgerüstet. sind. Durch Be : 
sondere Zusatz- und: Hilfsprogramme kann... 
"man, allen‘ Unkenrufen zum. Trotz, ‚auch in, 
"Basic. recht ‚gute. strukturierte Software: era 2 
stellen. Eines dieser: Zusatzprogramme ist: Zu: 

Be; ‚STRUCTURE; "welches dem. Basic-Pro- 
schon ' ‚eine: PASCAL: ähnliche : 


& Eigentlich‘ sollte” jedes "Drösramm - eine: 3. Form der Dateneingabe. 


Es: kann: 
BR: E te:di > 
‚daß, ‚einige, Elemente, dieser “ "Programm zur : Verfügung gestellt. (übe 
im...Prinzip hat‘. „DA 
jedes ‚Programm ; (vom Spielprogramm; bis‘-hin: 


zum: Anne nuchbS1UnEsproeramm), Kalgende ng "Ir welcher” 


1 SE Daten ?: Welcher. Art 

Ba (Alphazeichen, en 

de 

mit, be- a N Be 
un Antorderuinsen; an das: P ogramm. 


©. Daten: entgegennehmen. 8 Es 
Sowohl mIEeR: einlesen aus. de Programm, BR 
“durch .. manuell.“ 


: " eingetastere: Werte von dem ‚Benutzer, 
BE durch. ‚Übernahme von Tape/Floppy«.., USW: 0 


ıythmus: zw. e ns "Daten; Ausgabe 


Rechen- Ditenvererbeitunge Yofscheife. ab ne 


‚Immer, In. graphischer. Form, als F 


beim : Programmieren, und: E 
beim strukturierten Programmieren im Be- 
sonderen, . ist, nicht ‚etwa ...die Arbeit. :an..der 


astatur, sondern ‚die‘ vorherige (!) Erarbei=. ...des Muß, 


5 hacken. ‚Nur: werden Sie ‚sich ‚beim: ‚Hacker 


uß das Problem, .das 'auf dem Rechner ge. el 


löst werden. soll, zunächst einer Analyse un- 
vergessen, 


"wird::.sich. die f 
Beginn. bald b 
„eben eine: 
‚dort, ‚und: da. noch. ein Einschub,: und: rückz::: 02 
zuck ist. das. Chaos. ‚perfekt, und:.die Über- 
"Großrechenanlage benutzen eine ähnlich ge- Sicht dahin. Wenn Sie sich diese Fragen alle 
; „‚stellen,bevor ‘Sie "anfangen, dann: können: Sie: .. 
»» sicher: sein, keine wichtigen ‚ ‚Pünkte verges- 
: sen zu ‚habens, und: das; Sie. eine ‚höhere Über- 


‘Schritt, der die‘ Qualität ‚des späteren ‚Pro-. 
...gramms. 'entscheident.. ‚mitbestimmt.. ‚Damit. 
öbei: diesem. Schritt‘ keine Fehler: ‚begangen a 
werden; bedient. ‚man sich.:einer Art‘ ‚Check-:; e 
liste. Selbst: ‚Profi-Programmierer an einer‘ 


.artete Checkliste, die selbstverständlich um- 
..fangreicher. geartet ist, als: ‚diejenige, adie:.:; 
..wir.benutzen. Sie sollten sich also zu Beginn 
Klarheit, am ‚besten in ‚schriftlicher Form, 
durch | Stichpunkte ‚oder Notizen, über ‚fol- ET 






 CHECKLISTE x ESTER RER 
ib Zweck und. Funktion des. Programms (Auf- gr Eu 
gabenstellung).. "Was: . soll eigentlich... 
berechnet werden? Wie 'ällgemein. ‚soll. Nds: Kae 
! Programm später anwendbar sein? EHRE 


















"Welche: Formeln; ‚stehen : zur. Lösung. des es 
Problems: zur‘ Verfügung? Sind: diese For-.... 
.meln' ‚genau genug? Haben’ diese Formeln BE 


“. 





, ‚Ausnahmen: in.der.. Sülmekeit? Können De En 
„finitionslücken. auftreten? . 






































‚Welche Daten ‚benötigt das Programm? I 
welcher: Form ‚werden die. Daten de 


Tastatur, aus’ .dem:: Speicher... -I 
. Zei len-: ‚oder. durch‘ ‚Tape/Floppy ‚ode 
. über ‚sonstige Wandler -Joystick, usw. .)° 
Genauigkeitsklasse. ‚sind. die 
sind. die.. ‚Date 3 








„Welche: ‚Genauigkeit. soll erzielt: een 
(im: Zusammenhang mit: dem. ‚späteren.Va- 
riablentyp)?- ‘Sollen‘: ‚Rundungen :bei‘ Zwi- Be 


 schenergebnissen | WOTESDOTIDEN. werden 
(Wenn ja, auf wieviel: Stellen)? REBEN 
„Sollen: Sonderfälle 


behandelt : werden? = 


Wenn ja welche? . 





‘In welcher. Form solle die Daten über 
geben. ‘werden. (Bilc hirm, ‚Drucker,‘ & 
; Tape/Floppy oder. nstige: :Periphe=.: 
‚rie)?.- . ELLE 
Wie‘ Ssllen, die. Date 1 eben wer 
Seen als: Tabelle, mit Text, 
‚ ASCH-Format . I KRE 


Eine: solche Brobleniandiise ist. ein: N zwingen- 
"auch wenn. Sie einfach 'drauflo 


bei: j; "sie: wichtige Punkte 
ibersehen ‚können. "Sicher 
ende ' Organisation: ‘zu 
emerkbar' machen, und::so ‚muß: ; 
\nderung. "hierhin, eine Kürzung, 




















 GENIEDATA 35 


ans © Gedanken zu dem Programm gemacht . 


ne Söhreiben; Dabei chen Sie 
ni von ‚der PrOBFSMINIISE.DN: 


Zeichnung 3; 


: Aufruf. eines Üpterprogranimes. 3 
In..die ‚Ellipse ‚wird. der.'Name:: des. Unterprg 
© ;grammes eingeschrieben; welches. aufgerufen 
wird. Das: Unterprogramm selbst ‚wird wi 
ein autonomes Programm. ‚dargestellt. "A 
‚Anfang des‘ ‚Unterstruktogrammes. 
jedoch": ‚der‘ Name. ..des: ; Tnermiogrannes 
= Kennen gemacht: werden. Er 
ne die ee ar 
Anders bei 
‚grammen. Dort sind’ ‘Sp 
‚vorgesehen, und ein. Stru 
"aus Nnur. Vier: Grundsym 
‚liegt. darin, ‚daß: man sich 
Struktogrammen. erst einle 
‚niger Übung wird dies abe 
‘Problem darstellen, und. 
Darstellungsweise verwende 
;togramme . lesen: und sch 


BEDINGUNG 


boJe gibt e es alsor Ze EEE En ET ee 
——— - Programmsequenz 1: } Programmsequenz' 2 FE 


BB 


Re us ng der. ‚Alternative erfüllt Hi 
geishaumgd BEER: ‚ahr = =. true), wird die linke 
ni ne Er Hi ji - Sequenz Pp2 unter NEIN: 
3 Eu 47; ‚de ‚Alternative a 





OS GENIEDATA 


andren bedingung \ at 1.25 2 ame y "hAbbrüchbedingung- 








PfaseeschBenngung, 
R & ichaung 6. 5 











"Arten :VOn.: schleifen. Die 
jer: : Abbruchbedingung am An-. 
HILE- ‚Schleife ung 5) 





ingung am  Ende...Die. sog.: „UNTIL- Schleife 2: | 
‚(Zeichnung . sr... wird die: ‚Schleife. :PSE% 


Es können bei beiden Schleifena - beliebig ı 
viele: A senheaigsungen auf ete le a 











FE ußerdem ist ‘eine rarsıa ri: 
ee, ot ‚de 


x In dek- ln Darstellung 
am ‚oberen sildrand. ‚eine, ‚Skala 


a. ganz ‚links, 'so. Be 
ee DawE: ‚keine . ‚OrtSVer 


L 
"len.). Wer ein’ Colour. Genie 
‚besitzt, kann : den Parame 
; gleichen Zeile auf. 101 setzen, 
‚damit den gesamten. Bildschirm 


Ansonsten. ‚wird. das Prograı 
mit: RUN gestartet und. erklärt si 


EE Was: muß ' 'man. ‘nun. tun, we 
Figur in ‚das. ‚Programm, eingege 
all? N, 


eliebiges. scordine Vensyzich 


an nummeriert alle! Antaı 
te der Linien ‚durch. D: An. 





"Zunächst: zeichnet: 'man: sie di 


_GENIE DATA a 


0 
05: 
20: 
=E 


B 


IE N Nun. muß; noch. geklärt: acrden, ER: 
ni Punkte. zu welchen. Linien. ‚gehören: 


Linie Punkt K; Punict 2 


Im Programm löscht. man. ‚die alte. ‚Figur 


dem: ‚man die: DATA- Zeilen .ab'249i 


“ die neuen DATA- Statements ‚ersetz! 


Die: “neuen. DATA- Zeilen. werden 


folgt ‚eingegeben: oc , 


Sl "Anzahl der Punkte hier - = > 
"2. Punktkoordinaten. ©: : HERE 
:3. Anzahl der Linien (bier. = 8) ee 
‘4. Die. Bunktnummern; die ‚jeweils. eine Linie 
begrenzen. i HEN FENG: Be 


Sie sehen also für die Pyramide s so aus: Bi 
a DATA 5,0 0 1, 0, 11,0 0,0,0, ‚0, 0 


» Die. Hosirlanlerung. ug Größe de 
le sind ee 


‚tements ‚muß: ge 


das "Programm 


‚Darstellung ode 

















SEIRUZ.- 
440 FORTSITONG 





310, PLAT J1,1 10) 32; 1 
2520: eılzab 











3%. GENIE DATA 


"in IF 1800 urn 
140- IF 18el 6070 310: 
"170. IF 1084 GOTO 140 


2180 FELSIFERBFEDLOURGEBER 
© 190 1®.3rKlm,58-Z11XRe-ALıVTz, SRZIR1B/18: tert nn 


200 GOSUB.750sREM ERSTE. POSITIEN. 
© 210’ GOSUB BIOHREN ROTATION: 
220 ‚GOSUB 1230: REN: ELENENTRECHNUNG 
230 G0SUB 1950: REM ‚SCHNEIDEN. BR LINIEN 
240 GOSUB. 20101 REM PLOTTEN: Be 
..:.280.608UB 21B0:REN. STEUERUNG 
260. IF 1800. WO. ji 
2200. IF: 1824: 6070. 100 


| "7 REN, 


\ TEN" AH { 
38 un ZEN de 


Be veaehe BEER 
21.700. IFPEEK(AHFBAOI= TMEn ednsord 70: 
>: |; 710 -IFPEEK(UHF804) =2 :THEN Ka 0 
1.790: IFPEEKUHFBOZI=I THEN 

730. 6010700: N 


RIN | Na 
EMORUEOKAERTE = 


ANFANSSTELLNG 
Ele 


| 750 REN SUBROUTINE sr 
760 CR=PKxCYePYı Kia (DZ+2 


1770 TFRZDKITHENKISNZ 


320 REN "SUBROUTINE: LOKAL CERSEESNRERENENTN BEN 
.330:.K1=1E12:X2=1E-12: NeIEUNIE-1 EI Zee? 
:340 FORISITON 

‚350 KsEXtI)a YaEYCDISELD 

30 IFKOKZTHENKZ=X ne 


:.400.IFYCYITHENYI=Y © 
m IFICKITHENKIST. 


m DeIZ-11oD 


450. EMEERLD-PLENDEENDPHELDELD-PL 
160 NEXT NEN EEE EEE 
l RETURN er 

480 REM: SUBROUTINE 5 mn 

0 FCOLOURS Be Tale 

500: H=4ı31=10192=100 


530. FORI=1TOJ 
540 PLOTII, LI: ro a 2 
550 HEN 
560 NEXT. 


570 Jial0t issues 


580 FORISITOIB 
590 PLOTII, TuT,12 
600 15 : 


ang a ZURU 


a PROGRAM BEENDEN 


-YInDZE22-11:PHaKLADR/ZUPYaYIDW/ZUPZ=Z 


780 ClePZ-I. 1011 © 
790 SSR DIEDHONDTEE 
:800. RETURN . 
810 REN. SUBROUTINE Aue 
820. IFIS=26070: 1190. 
: 1.830 IFIR=4 THEN WIs0 
1849. IFIRS4 THEN Re Er 
850 IFIRSI9 THEN MEERE 
1: 860 IFIR=I9 G0T0.880. 
>: 870 NaNelihLiN=hT 
1880. 19eJRsIEND=IR 
15890 FORBSITON 00. 
300. AKTJ= EX: AYT=ENID 
210. NEXT 


> E80 98110 / 
12990 008 soo m, Ja, 
..:1°990 NET FEEREE 
1:90 S0T0 10 Ä 
‚m SIEBEN KERN. | 
380. FORI=1TONI 
21.990 KeAYiDacDeAzDasT . 
211000. ALLNI=AYIIDEBTAAZITIBCDIAY 
> A0R0.NENT. : = 
15-1020 SOrO 90 
[1030 8125INwı IK). 


1100 1 X=AXLD)SCO- -AZDIASI : 
1060. ARDSRRLIDISTAZUIDACHAKIDISR 


- 109. STESINNLIKIPACOSCOBINLIK) 
1.1100 FORISITON 
PING KSAKCHIRED-ANEDASTN 

28 2]:1120) ADAKNSLR RER 

MASS | | ; 

| 1140 5070.950 RE 

1.4150 FORISITON . 

11160 AKCHISRKEIIHPR: ADAM Anm 

-170.NEXT ©: 

| 1180 RETURN. 

1190 FORl= 1T0100 - 


1130.NEXT. 





shi en a ; 


























imo, NET EB 

1220 NediMls0s60T0 870 = ee 

‚1230. REM SUBROUTINE ELEMENT : 

1240 FORISITONZ U. H 
1290. HeIDi1, 1319281011, 2: H=28l-t: 12e20] 

U 1260:PRCILISAKLIDISFYERDSAYLILIGFZUIDSAZUUN) 


12m, FRUZIRGZ EL UIBIFNUZH FZUZIALU2) oo) 
12B0.NEIT. EEE 


‚1290. XalZ#21: 
1300 FORI=1TONZ. 
4310: 1=281-13 128281 nern + Fu. 
1320: IFYIDKANDY2IX .GOTO 1420: : 
1330. IFYICXANDYZCK. GOTO :1440 BE Re A 
AaYIRlCZH20); X2=C1:51=Y2- Mi: Eos (x2- ini 
1350. .1FY2CYı. 6070430 2... en 
1360 FRLIDSFRIHLISCDRIFKIZI-PRUIND “ 
70: FYITDISFYLTDACDEIFY 12) -FYLLIDI. 222% 
1380: FILIL=EZ+ZI:SOTO 1420. ee 
1390: FRIDISPRLTZIHEDRFRID-PRUDDI 
1400 FYtIBI SEN IZINCHENPNALRISEYNLZI) Ei 
1420 NEXTT: 
1430. 6070. 1480 . SErEEEE 
140 FZU)> 6142811: rLuD« FL). 
"1450. FVEILISDYEFYETZIS-OV 
1460. FRtIh)® CXHLOHRı FXGIDISFRUIN 
..-1470 6070 1420. 
1480: FORISITONG BEE JE 
1490: FDSCH U: Aids FH: FLUT FD. 
:::1500.NEXT. I BEE Be 
- 1510 FORI= 1TonS ee eis 
1520 PRDSFDAUFLUN: FIEDISENIDARLIFRUN 


1540 RETURN ©. ei 
1550 REN SÜBROUTINE a 


4 1790 Ren. SUBRDUTINE € eur. a 
1.1800 SI=0:00=0:E91E-3:D1 es: BEE 
1810 FISX2=KlsF2=Y2-YI e: 
:1::5:1820 IF Fl20 6070. 1860 
1.1830: IF F2=0: 6070 1880: en 
| 1840 818 (Al- A IFI- -Bi- NDIRRU-RLFR 1n2- AED. | 
1.1850: 6010 1900: i 
» 1860 IF A2ehl THENBI=2: 010 1900 ERNENERLESTNEEREEN 
©1870. ST=0K-ADD /IR2-ADEBOTO ABO. 0 
1: 1880 IFB2eBiTHEN-S1=2:6070 1900. 
1.1890: S18(YI-B1)/ (B2-B1) 55070 .19 


GENIE DATA 3 


1910: IF Fl=0 6OTG 1940: 
:=.1920:. IF F2=0: 6010 1950 
11930 CO=tAf+SI8 (A2-AI)- IFL: som 1980: 
1940 CO={BI-YID /F2160T0 1960 
1.4990: C0=(At=K1)/F1:6070 1980. 
190 | IFCO>DZOREOKDI soro 200 


1970. Jiejt+l‘ 


| 1980 DiekiscosrtB2evtecdar? 
1990 EKCOH,DSDIEEK(U1, 202 
200° RETURN | 


2010.REM SUBROUTINE mar 


12.2020 FORI=1TON3 SE 
..2030° FXD= TBR(FKLTIHAR/2UHR. 
2040 IFFRLDIKOFXKIISO a 
2090: FY{l)s TBRIYITISYBIIAUNB 
12.2060: IFFYCDKOFYILISO > 
2070 NEXT BE HRNEHRAN 
| 20 rn, 00 BmaUIRAA1,O1FL 
2322 0L0URE u 
2090: PLOTIL 1aroı, 1 une, 1B7018, A ron, man, Lin 
1: LOTIL,ITTOIL, B 
[2100 FCOLOURZ 
72110 FORISTONZ. 
2120 Me2tl- Hl2e21 


= 2130: Hsrkiil): Kaertt2): Yierriadı Nerv 
2140 -IFX13170:6070: ‚2160. EE 


BSH): LTEABSIVLNLZEABSIY2) R 


1800 IF AC=IR AND. YKaiR, AND ker An IaKevT Tre ‚500 ni 


2150: PLOT, ron, Ye 
:2160. NEXT. 
"2170 RETURN: BE 
2180 REN. SUBROLTINE LAUF Bi 
2190. 18=0F IR=4 2 


1.2200: GOSUB 480: REM SKALA : 
| 4 2210 IFPEEK(&HFGOA)=2 THEN 


1700 Ir 102 THEN 1720: | 


1110; ‚Natkti, DAYISEK(h, D Ekız d Yet, 2: 5010 m 
20 


m IFI=0 Tun tie 10013 som 10 


"THE Det iel N- m 
Au Walkı ‚Ike 7 













ıy 40 GENIE DATA 


eg 2370 A2=3.1415926 (I1- 101190 SE BFTEERESESELST DE Zupg: RETURN 
2380 IFPEEK(&HFROB)=I THEN WI=A2ı IR=1: SOTO2AS0 00] .2990 REN PAUSE 







































2 2390. IFPEEK{&HFBO4)=8. THEN WI=-A2: IR=1:60T0 2 052480 FORI=1T00: NEXTRETURN. =. o. no en 
2400: IFPEEK(KHFB0B)=4 THEN: Wl=A2: IR=31 60102459 Bere 2490 -DATA20, 1,0,0,2,0,0,3,0,0,4,0,0,5,0,0, b, 0,056, r 6, 6, ‚2: Erg 
222410. IFPEEK(&HFBO1)=2. THEN WI=-A2: 1R=3:60702450: en 1: 0130363 610,61,018,8,048,8,0,3,5,0,2, 01 50, BE 
2420 :IFPEEK{RHFBOB)=2THEN WI=A2: IR=2:G0102450.° 0 1 
2430 TFPEEK (&HFB10)=64THEN Kle-Rzı IR« 2 50702450 ie 2500 DATAI2, 1,6, 20, 7, 19,8, 18, " 17, 1 16, 1, 1; ‚16 4 5 BE 
2440 6070.2210. a sh 3, 5, 12, 6, ui a = 


2 2150 part, E 2 180: J=300: SOSUB2470 Part, 5, 2, 0 





| an SEIFERT 


Dazu müssen die Anschlüsse: TXD. und : 
: Masse ‚des. seriellen‘ Port mit. dem: Periphe- 
riegerät.. verbunden  .werden. .. Bei einem. -: 
Drucker: ist. darauf, zu achten, daß er. keine... 
; Daten empfangen kann, während er. mit der::i::: 
Ausgabe beschäftigt ist. Dazu: kann der Ein- . 
gang Carrier Detect mit einem’ Ready-Signal 
des :Druckers‘ ‚verbunden werden... ‚Dieses. FE 
Signal muß geeignet abgefragt werden. a 















Es handelt: ‚sich. er um ein. = Treibecpron‘ 
gramm für. die‘..serielle...Schnittestelle. ‚Es 
kann dazu: benutzt werden, um Daten; wie = 

ErsDs: Programmlistings, an. einen seriellen En 

Drucker ‘oder ein Terminal mit V-24 Schnitt= DIE: Baäudrate: ‘kann - in. Zeile‘ 290 des.) 

Er ‚stelle ‚auszugeben. een Assemblerlistings geändert werden. & 


220 ENTER ea Bali | LuREN 
230 LPORT 'EQU ASICH.  HRORT.FF DATEN’ 



















240 PORT ...EQU.ÖFFH _ HAUSBABEPORT 

..250.B110.. 'EQU 2204 3110 BAUD" 

260 B300 Eau ocHH  ; Z00.BAUD - 
270. 81200: EQU' ZDH. 2231200 BAUD:. 

‚280 82400 . EQU 15H 52400 BAUD 
290. BAUDR.  EBU" B1200. _ SEINGESTELLTE BAUDRATE. 

a ee Ä LESEN 
BLOEERET-ORG aa00H  soer ANDERER ; ‚FREIER SPEICHER Sen 
SE3E0 2 PUSH ie, 

EUBAONEEEN PUSH. BC: 

380.27 7° 7. PÜSHHE: ee 

360.2". [DHL EYTE+1 ae 

:370. = !EDBEB 0 BBLTS: ; . 

.380.L00P1 RRA 00 510 CARRY-FLAG SCHIEREN . 

BEE SENSOR; Con LOOPZ2 
490 2,2 RES A CHOI Br wo. 









FLO FRIRSLOOPSEHE TEE NEN HSERD EEE 
420. L00P2 SET: 1, a BIT 

2 :880:LBOPS: INECHL En a 

MO. 25 0D0NZ LOOPI  ;NAECHSTES BIT 
... a en 

"1..460° 
a 



















AUSGABE 
LUD HL,BYTE 





Level: 





4; A 
(HL). 


= SET; 
SAND: 
- QUT KPORTI,A. 
"INEUHL 
= SALE: DELAY. 
"DINZ:LOOP4. 2 7AO 
a a ER 
FORLBOHEEESSPENDS 
POP AR ER 
„ERET./ ir 


AVERZDEBERUNG 
"PUSH AF > 
22 PUSH: BC. 
SCHE BC. BAUDR 
'DEC'BC “ 
[De A,BESTTE 
ORTE EEE" 
"JR NZ, Dev 


Laut Aa des‘ Video: Genie, G ne 
"porteuers besitzen. die: VG! s,.die 
IV "Zusatz-ROM "ausgestattet 
anstelle eines ‚Maschinensprache 
Routinen’ für. Shorthand-Eingabe, 

, Hardcopy, usw“ ‚Ami‘: Ende... dieser 

"befindet sich: ‘jedoch ‚bei vie 

‚ROMSs.. noch - ein. »Mönitor-Bruchstück. Es. 
‚beginnt bei 3509H und: geht bis : '36FEH. 
‚Nach.dem Starten." des. Monitors mit: 
"SYSTEM": und: ./13577": wird ein u 
Prompt ausgegeben. Der Monitor‘ verar eitet 
‚folgende, Befehle: 2. 3 EITEEENERE 


AHenadresse EEE 
:ASCIH-Dump .. ab... 


| der. 
‚Startadresse., 


= angegebenen. 


D Hexadresse: . a = 
Hexadezimaler. Dump ab ‚der Startadresse. 


Listen: und. ordnen. re Bytes. im: 
2 BREAK-Taste- 


'RAM (ab 40004). an n Hexagnesse, 2. B;: 
E400 00:23... WERE] 
"ändert: das: ‚Byte E400H. von 00 in: 25. Mit 
„und: ‚das nächste. Byte; wird ausgegehen., 


+H Dezimalzahl : 2 } 


Bros 
700°. 
:ETEQ.E 5 
720: 4: 
30.:: 


EETBOLELD 
EHE 


EREESRERSS ERSTE ZBOFE ER 
BE RE OL ERH SR ER 
EEBOR 
BONN; 


VSBAUDRATE 


 \P'aaaa bbbb cece: 

» -Bruchstück.. 

“normalerweise den: Bereich von aaaa bis. 
; bbbb:. mit: 
‚Cassette: abspeichern,‘ steigt. aber. nach. "Äb-.; 
| ‚frage des. „ Pfogtarhnnamens mit. "NAME?! 
AUS len Be BE 
en 
R Restart, entspricht JUMP ( 0000. 


. S aaaa bbbb cc ERUSEELFAGHEE 
: Sucht. den Bereich ‘von aaa bis bob, 
ı nach: dem, Byte sch: ab. ee = 


X: aa bb 


Dieser. ‘Monitor 


. NEWLINE bleibt der ‚alte. Zustand‘ erhalten ‚tabel. wie ZBUG, er: 


: keinen Speicherplatz im: REN: 
"di 


> GENIE DATA: 41 


FOFÜ BC. 
FOP.AF- 
KET. Eee 
IHILFSSPEICHERZELLEN % 
.». DEFB OFDH.. 3 FUER STARTBIT 
 DEFW OFFFFH 4B. DATENBLTS' 
SO DERWSORFFEH N 
2. DEFWOFFFFH. 
DEFWLOFFFFH N ns 
a 


END ENTRY 


‚eines. Epuich- Befehles. 3 Sollte 


der. Einsprungadresse 'cece" auf... 


Wandelt aa‘ und- bb: in eimale Zn um: 


: und berechnet Summen: und Differenzen. 


en Leertaste : 


Hält laufende: Norah. an. Dirch Deticken . 
einer. beliebigen Taste wird. ‚ger. ‚VOrgang. 


fortgesetzt. 


Bricht: laufenden Vorgang ab. 
ist. zwar: nicht so "kornfor- 


‚Ich. benutze 





benötigt ‚dafür. aber. ij 











: 2 GENIE DATA 


bone (use) a "HOEOH msB). steht ie man das: Level: N ROM. initialigieren: 
De (Entry Point), 2: B. DE » 06CC kommt: man direkt ins Basic zur 
‚00 und: #0E0 70:2: 32:22 2 (sog. Warmstart). Einen kleinen Schönhe 


fehler. 'hat..der Monitor. allerdings noch: Ab. 
Die. Ei unande des: "Mäschinenpro- und’“zu wird ‘beim ASCI- -Dump: nicht d 


amms . lautet: .also..7000H.' Folglich. kann \ "Bildschirmb 
an: mit 3 7000 ‚das ‚Programm starten... u ganze ildschirmbreite ausgenutzt: und w 
i Ber" als 48 Bytes geisiet:,.. Er | 


Noch ‚zwei "Adressen: Mit, J 3039 kann... 


10. CLEAR: 'CLS. it al 
2e PRINTS480, Ploechten Sie eine Progrannbeschreibung, 





IE UPs-nInTHENIS00 ELSE 30 
CLS Y Es} : i 
ÜFORI= ıTO048: PRINTCHREC2a1); ENERTL, Rn 
"PRINTS72, CHR$(231)Y; ; FORI= 1T015: PRINTCHRS(231); 
& ‚PRINTSSL. "tGehirn- Training)"; PRINTSLIZ.CHReC2SL 


98. PRINTSI1S2, EHnScasia: 047: PRINTCHRSC2SI) s 
108: PRINTS333, "Geschrieben. NR INTS373, "1984. von: 
ler”! PRINTS493,"Am'Sande 9”: NT5533,.”3110: Velzen 


= RE "Grafik Symbole 
THEN 120 ELSE eb... 








_GENIE DATA. 2 


RSL23TI:PRINTSSS ,CHRSCZIE):. :FORT=ITOS: PRINTCHRSC2ITY; "NEXTI: PRINTSES, ca 
$(237).  :FRINTSSS, CHRSC2362: ‚FORISATOS ERRINTCHRECALZY, ;NEXTT: APRINTSTSN 
EHRSC23TN. 


.30..4=83: L=31: 'FOR1= 11011: PRINTSU. CHRSC22S): PRINTSL: CHRSC225): us U+40: L* LE 


+48: NEXT.I.: PRINTS204, CHRE«217); ;FORI=1TOB: ‚PRINTCHR$(217); NEXTT: PRINTS21 
Er EHR$C225): PRINTSS 23, CHRSC239); :FORI=1TO?: BRINTCHRSC217); NEXTL: ‚ERENTS 2 
53Y; ‚CHREC249)" De Br EEE 
240. PRINTS9S CHRSCZ 28): PRINTS LOG), :PRINTS10S, CHR$C225): PRINTSISS, CHRS | 

"62395; ;FORI= :T0O9: PRINTCHRSC217).; :NEXTT PRINTS145, CHR$(248Y. A a3 
250 ..R= 189: T= 115: ‚FOR1=1T020: ‚PRINTSR, CHR$C228): ‚PRINTST, CHRS(225): R= -R+A0: T Bi 


=T+4@: :NERTTE: En 
268 PRINTS255,CHR$C236); - FORT=1T08: |PRINTCHRSC217): !NEXTI: PRINTS265, CHRS 


"€237): ‚PRINTS29S, ‚CHRS(2253: PRINTS297, "Min: Sek": PRINTS38S, CHR$C225): PRINT 


83936 ,CHR$C217) ;.: FORI=1TO8: PRINTCHRSC217); :NEXTE: PRINTSSSS ‚CHREC225): RE 


uNTsaas, CHRSC228) 2 
“270 PRINTS37S, ‚CHR$C22 25): PRINTS38S, \CHRSC228): PPRINTSA1S, CHRS(239); : FORI= 
709: ‚PRINTCHRSC21T): SNEXTE: PRINTS425,CHR$(C2408) ME 
280. PRINTSS 55, ‚CHR$(236): :FORL=1TO9: PRINTCHR$CZLT): :NEXTI: PRINTSSAS,ı 
KC237Y:Y=575: U=588$: FORI=1T07:PRINTSY,CHR&C225): 'PRINTSU, CHRS$(225): Y=Y+48; 
"U=U+A4@!NEXTI:PRINTSST6, ZMosglicheniREINTSEIS, ermeern ":PRINTSSS 6, ‚»Pun 
ktzahl”:PRINTS696,CHR$(288); a en, ee ee er 
298. FORIL=ITO8: PRINTCHR$C288); !NEXTT. ET Be 
328 PRINTS737, CHR$(236). FORI=1TOS: PRINTCHRSC2I NEXT: PRINTSTAS, CHRS 
"237: "PRINTS7?77, ‚CHR$(225) PRINT$783,CHR$(225). Fi : 
318. PRINTS7E, CHR$(C2183: 'PRINTS156, CHR$(218)', PRINTS236 (CHRSC218>: PRINTSZ1 
5; CHRS$(218): :PRINTS398 ,CHR$C218): PRINTS4768,CHR$(218): PRINTS558,CHR$(C218) 
:PRINTSB36, CHR$(218): PRINTSTIS, CHRSC2 182: PRINTS7S6, CHRSC218): ‚PRINTSBTS, 
CHRSECZIENNN SE: en 
328..PRINTS77, "ig®: PRINTSISS, rg” PRINTS238, ”8”: ‚PRINTS318, "7" :PRINTSSOB, 
"UPRINTSATB,PS®: PRINTSSSB, 4 PRINTS638, ?3”:PRINTS71B, #29 PRINTS7S8, 
Pr PRINTSSTS, RL 


'92;, CHRSC253>: PRINTS1SS, mem. EPRINTSISO, Te" 

‘338. PRINTS152, "x" PRINTS234, "x": PRINTS314, nn. 

x: PRINTSSSA,, "x" \PRINTS634, MM: PRINTS?14, we". PRINTSTO4, an : 

358: ERINTS LO. DE :PRINTS19G, Pe: ‚PRINTS278 "x": PRINTSSS®, Pen: PRINTSASB,» 
":PRINTSS er PRINTSSSE, "en; :PRINTSE?O, ER: FRINTSTSQ, Ben; :PRINTS83@,” 


ae eRinırann, CHRSC228>: PRINTSB1T, CHRS(239); : FORI=1T0S: PRINTCHRSC217) 
‚NEXTI: 'PRINTS823,CHR$(248) a i a 
3780: 'PRINTS8SS, ‚CHR$ (239); FORL= 1708: PRINTCHRSC217); :NEXTL: :PR NTsB6S, CHRS 


6240): 'PRINTS869, CHR$(225): PRINTS874, PX": PRINTS87S, CHR$(225 


380: -PRINTSSO9, CHR$(225): PRINTSS1B, ‚CHR$C195); : FORI=1TOA: PRI 
NERXTI: PRINTS91S, CHR$(225) ne. SELTENE 
398: PRINTS949, ‚CHR®C239); „FORI= -1TOS: PRINTCHRSC217); NENTI:PRINTSESS, eune 


80. PRINTSGE, a: PRINTSIOL, BEHTERGSEN, a 
0, PRINTS378, "gar: PRINTS381, FOuR,. 0, 
8 .IFK=1THENGOSUB4S@ ee 

"IEK= 2THENGOSUB1 350 2 

48 'GOTO98E9 2.0 
a Y= RNDC1O): Ma 
8 IF E=2THENN= N+2 
ie E= ITHEN N= 


























ÖErinTisse. 

e ‚IFm= 1OTHENIS1IO 

SIFY= SATHENgs Han 
IFY=3THENOS="O" 

IFY= ee 


e IFX= -STHENUS 


LFX=4THENUS="D” 


2 LFX= =STHENUS=PEr 
SIFXSSTHENUS=P IM een 


38 IEN=TTHENUSSPIn en 


@ IFX=8THENUS="3" 


S: LIS=FFs |. 
EFFSSCGE. 


:CC$H-TT$ 





_GENIE DATA 2 


0 IFa- ATHENPRINTSS30.CHRSC10S) EEE CHRSCSS): 


fr 


IFA= -STHENPRINTSSSE a Be un: CHRSC195); .:GOSUB 


| 9: PRINTSABB.Cı CHRSCI9S: :GOSUB- 
niederen a 1! \ ou aie remis: CHRSC195); en 
1FAZBTHENF ; SUBLBIBHPRINTS2P2.Cı CHRSC195); . GOSUF 
ra oornenPRann z 5? u PRINTS1SO, CHRSCIOS); 
| :GOSUB1810: PRINTSLIO, u 
nannte ” . | „"i":PRINTS317, ie peter 1 
PRINTSA77,"1":PRINTSSS?, "1 Benin PRINTST17, "1": PRINTS797," 
RINTS877, "1: PRINTS? . | nn. 
!GOSUB1820: PRINTSS7O, ‚CHRSC233) 
anna ln. CHREC233); 
:GOSUB1820:PRINTSE7O,C CHREC233): 
9: PRINTSSQR, CHRSC233); 
28 :PRINTSS12,Cı CHRSC233); 
1820: PRINTS438,Ch CHREC233); 
en CHRS(233); 
820: PRINTS270,CH CHREC233); 
320: PRINTS1S0,Cı CHRSC233); 


B:PRINTSLLE, ‚CHRS(233); 


ade ı bitte dien: PRINTSG20, NLeertaste dr 





IFY=TTHENDS= SCHRSC241D. 
IFYSSTHENOSSCHESC2IO) 





IFX= 1 THENUS= CHREC242 
"IFX= -2THENUS= :CHRS (198) 
"LFX= -3THENUS$= -CHR$(209) 


IFX= STHENUS= EHRSC230). 
STEX= STHENU$= CHR$(202)' 
„IFX= ee. 


END M . ee 
"FOR 1=1704: PRINTCHR$C195) ; : NEXTT: RETURN 

'FORI=1TO4: BRINTEHRS 933: INEXTI:RETURN > 
. D$="1":PRINTDS:DD$=D$: PRINT: PRINT: PRINTDDS / EEE 
2  FORR= 1107; PLaY(2,8,R, 19): GOSUB1870: PLAYCH, Be SuBıor0:Pp A 



































en; Finklastand: Aan:Die: Jinke:2 


"ungleichen. Zeichen), 


1998 PRINT”"Das mittlere Feld. ee die, en > 
Ss: vergangen. sind. an.Das: ‚Programm wird. bei: erreichen vOR 28; 

in: beendet.” a 
zeigt am Ende des 


“oder. nach:: Ablauf, von 1 
2200 ‚PRINT”Das: untere Fe 
'ichen’ Pluspunkte.” 


Zahl: ‚gibt, ‚die: Piübpünkte.. ‚an 
bei ‘gleichen Zeichen) und dierechte: 


. „GENE DATA u 


Leerteste 
zahl die. ‚Ninuspunkte (Leertaste ‚be 


einheiten, die eh 


Programms die ’moegl 


2010. ‚BRINT::PRINT.: ERINT PRINT SUR Fortfahren Leertaste | 


2029 WIs= INKEY$S:TFWIS< 
2038 CLS:PRINTS48@, "Und 
‚1000: COLOURS: NEXT: ‚soTosa 


ni & ’ 


_ THOMAS WEINSTEIN 


NEWDOS so und: ‚sein ' Abkömml g GDOoS 


ind von ‚Hause ‚aus, ‚schon sehr‘ 


(im. übrigen sichten Handbue 
alınen: läßt. So, ‚habe ich ‚nun: ‚die ‘Span 


jelleicht Her: es: den einen ae 
en des‘ Handbuchs scho 


daß _NEWDOS. 80: ‚(al 
zur er ee von: Pr grai 
men": Me ‚deutsch... Handbuch, “N 


‘die ‚Möglichkeiten, di \ 
dem. een Benuac, damit biet 


. nsten ‚wenig. um oeanee, nn 
ie außerhalb seiner auf‘ RAM und. ROM „DES 


:"THEN2020 'ELSE2038 Ex 
nun viel‘ Spass und Erfoig bei:.. E 


‚Je nachdem: welches: Pin. auf: Masse "gesögen: 


wurde, unterbricht. ‚er. seine derzeitige. Ar- 


beit, und wendet. sich ‚anderen. Dingen: zu. 
“Einer dieser Pins heißt z.B. NMI (Non'Mas- 
kable Interrupt) und ' sorgt. dafür, ‚das der. 
Prozessor: 
„bricht, und :an ‚der Stelle 66H ‚weitermacht. 
"Bevor. ..er...das. 


‚sofort ‘jedes. ‚Programm “unter- 


aufende Programm. unte 
bricht, legt. er allerdings die Rückkehradres- 5 


.se. auf dem Stack: ab, Nachdem die Ursache 
"der: Unterbrechung beseitigt ist, kann 'man 
"mit. :RETN : 


"im... alten ' Programm, weite 
machen. . Die Unterbrechüng ‚heißt nicht ma 


- kierbar, ‚weil es kein Mittel gibt, die Unte: 
binden ke von.einem Programm aus zu.üunt 
‚binden. (s 
rung: des. ‚normalen Interrupts.). 


iehe: auch .die. nachfolgende Erk 


Ve lösen Sie. Au wen 


Beinchen- ‚trägt die Bezeichnun 


kürzung für. Interrupt, was. ‚einfach soviel 


wie Unterbrechung. : 





‚Pluspunkten | 


|: FORII=1TO. 


5 bedeutet. . nun: 
... dieser ‚Anschluß. auf Masse. gezogen, Be 





























“ GENIE DATA_ 


"das. Unterbrechungssignal | nicht: 


‚wieder ‚richtig. äufsetzen will N 


Um auf den. wichtigsten Punkt in! ‚dem nn 
‚ganzen Mechanismus. noch einmal Hinzuwei- 5 


sen:..: Der: 


a "sieht, 
a Dies wird. durch: ‚den Befehl. DI: (Disable: 
ERS Interrupt)- ermöglicht. EI: (Enable' Interrupt) .- 
schaltet die.Interrupts wieder ein. Ein Pro-. 
Be ‚grammstück,. das zwischen diesen 'beiden: ‚Be- 
‚fehlen: liegt, kann also durch ein INT: Signal -.: 

Be nicht: mehr. unterbrochen ‚werden. Zu: beiden 
Arten der ‚Unterbrechung ist: noch: zu sagen, 
daß im: ‚Interruptprogramm'. zuerst alle Re- 
...gister. auf. den: ‚Stack: ‚gerettet ‚werden. müs=..- 
sen, wenn man 'später .im. alten: ‚Brose EM 


‘acht, wird. es. u 


‚Programmfluß “wird. nicht wie er en 


“üblich. durch. Sprung- oder : Unterprogramm- 2 


hilee: nur er der: "ober? "erwähnte: "R 


‚Knopf, oder man 'muß vor der Änderung, wie A 
‚oben erwähnt, mit DI die: Interrupts. ‚verbie- 2 BB 
‘ten...Das ‘Programm: muß, wie. ein: normales a 
" Unterprogramm mit RET. abgeschlossen. wer- 
den. ‘Die ersten: vier Bytes. des Programmes 
sind für. NEWDOS reserviert. und werden: für. 
Verve en benötigt. 
"Vier. 


ist. nur da Dritte. A in 


stehen die ne 


ne inemn. nee 
= ‚25. = 200 ms. einmal # 
‚Die drei anderen Bytes. ine 


‚befehle beeinflußt, sondern: durch ein "sen als 


"das: von. aussen. kommt. SEE 


‚Stellen Siesich:nun von, "daß durch be : 
xternen Impulsgeber der: INT-Eingang. des.Z. 
in. ‚regelmässigen Abständen, z.B. alle: 25: 
‚„ Millisekunden, auf: Masse gezogen wird. Der: 
:. Effekt‘ ist, .daß das laufende Programm alle: 


25 ms einmal‘ unterbrochen ‚wird, daß Inter- 


“wird, und dann das alte ‚Programm weiter 


‚ausgeführt: wird. An..dieser Stelle wird Ihnen . 
warscheinlich: gleich. .der ‚größte Nachteil: sr 

‚dieser Methode auffällen: Wenn das Inter- 
‚merkt... 
' der. Benutzer, daß: ‚der: Computer. nicht. mehr. . haupt. tut. Ich will Sie de 


& ausschließlich. an: seinem. Programm arbeitet, . 


'ruptprogramm. zuviel Zeit: 'verbrät, 


5 ondern noch ‚irgendetwas ‚anderes tut. es 


_NEWDOS: 80 macht nun genau. ‘von. ‚dem: 
oben: ‚geschilderten Verfahren Gebrauch. Alle’ 
25: ms wird das: laufende : ‚Programm ‚stillge- 
‚legt, und die: Interruptroutine: ab 38H abge-  : 
‚arbeitet. NEWDOS 80 benutzt: dies z.B. um. 


die interne Uhr (für ‘den TIME- und: CLO\ 
Befehl) weiterzustellen, oder \ um die Tasten 
'kombinationen . «IKL, ei 123 “oder 


auf: mein 


: are ‘des oem 
hängt. bzw.. ausgehäng 
4410H hängt das Programn 
‚.te/ein und. CALL..4413 


aus. Eine: genaue . ‚Besct 
E: ruptprogramm an der ‚Stelle. 38H abgearbeitet 3: 


auf: Seite 25; des. geutst 
buchs. EEE 


So ich denke: je 
..Beispielprog 
Viele werden sich fragen 


auf die: Folter: spannen. Da 


erster ‚Linie .ein. praktisch: 
„oben. ‚gesagte, 
‚ Experimenten. anregen. Au 


‚und: soll 


„interessante Utility, die 
.liche:.Dienste‘ geleistet h 
“miert bin, gibt es bis j 
‚für. das, Video ‚Genie. 


“ "Das. ‚Programm: ‚wii 


DFG er a, 


bzufragen. Soweit. wäre das für. den: Be- alle 


zer: ‚eigentlich. nicht. ‚sonderlich : interesse Mi 
‚wenn: sich die .Programmierer von .. 
NEWDOS nicht etwas besonderes hätten: ein-... ‚W 
‚fallen ‚lassen. Das ‚Programm. ab 38H ist: in: 
‚einer‘ in: die. der. 

Anwender wenn.er will, und sich an ‚gewisse ; 
pie leBeln halt, SiBene ne ‚einhän- u 


‚sant,: 


r...Art. Kette. organisiert, 


und eichzeifig. 
ee | 


der. we frei a 


Was tut. nun: das 


Besen : Es ‚ermög 


ne Er muß: sich‘ dabei Richt um das en 3 


‚der a oder sonstige nee n 
„bel x EN 


auf...die ‚andere _ 





Von: ‚diesen Er 


etzt den \ Copy- -Befehl mit "Shift nn Back. 

space: wieder. löschen; den. Befehl: DIR: .L.. 
eingeben, 'sich' das: Directory anschauen, und... 
ann. den Copy- -Befehl: erneut eingeben. Falls! 

ausch aktiv ist, was Sie im übrigen an .dem 

in der. rechten,: ‘oberen: Bildschirmecke er-.: 

ennen..können, geht .das. ganze ‚viel ein 

ae ‚gen: ne Befehl zu Mi sehe: ER 


__GENIE DATA a9 


und: schalten En auf: 'den:: weiten -Bild- 


schirm um, ‚und. starten Sie. ganz. normal: das 


‚gewünschte. ‚Programm. "Sie. können: nun. Jezini 
derzeit innerhalb des. Programms‘ das'Direc- 
"tory.. ‚anschauen und: wieder wegspeichern. ö 
„ACHTUNG! ‚Jetzt können Sie natürlich: keine 
‚DOS-Befehle. mehr ..eingeben.: Sie ‘sind ja: in- E 
nerhalb: eines ‚Anwenderprogramms! 3 


Sozusagen. als Abfallprodukt bietet. sic 


= nach ‚folgende: ‚Möglichkeit an: Geben Si 


NEWDOS: und: vi = 
Jetzt können . ‚Sie DIR: 


eo Das’ ganze furiktio 
cn Seller > ‚80 "Befehl. id ie k 


aus einem , Programm ‚herausb ng 
ie. Ze: :B...an; en a 


z z.B» :mit. dem Debugger - einen: ‚Speic erb 


reich ‚auf ;den: Bildschirm. aus, speic ern S 


einen Zweiten: Bereich es 
„ersten Vergleichen ‚wollen aus .\ 
“. die..Shift-: und: Breaktaste | 
5 wechseln sich. beide Bilder:in schneller Folge 
‘ab, und. alle ‚Unterschiede zwischen: beiden: 
& Bereichen, lassen sich: mit:einem: Blick daran 
i ‚erkennen, ‚daß © sie': 
» "blinken: 
"Möglichkeiten: ein, wie‘ Sie das’ ‚Programm 
für. Ihre‘ 
= “können. : Be 


‚auf. ‚dem: -Bildschir 
“Ihnen: ‚fallen: sicher: noch ander 
N 


‚Brobleme ‚einset 


Ich. will an ser Stelle nun len wei er. 


Sn auf das: Programm. eingehen. 'Mit'.dem vorher. 
„Gesagten - .: und... den: 
‚Kommentaren dürfte‘ es. kein: Problem: 
."Sie.sein, ‚alles: zu verstehen. Nur ‚noch: 

Punkt! 'Das ‚Programm ‘ist ‘nur‘.ein 


. ausführlichen &5 


für die ‚vielfältigen. Möglichkeiten, die ei 


en Interruptkette. bietet. Probieren: Sie...doch 
‚einmal 2. B..eine Interruptabgefragte Tast 
Ur ZU: de 
Srsdlen. oder. . 


realsieren, ER. einen‘, ‚Drucke 


aunananer a 


a * 





50 GENIE DATA — a 


Bun 
speak, 


© BUFF a 'E 


32: CURSE: 
.:HIMEM. 


 AUSHNG , EQU 


 EINunG 


U SBUFFZ 
ne 


ae 


an: 


ZEIGT. AUF LETZTES ZEICHEN m Dos 
-3EINGABEPUFFER fr Ss 
3 ZEIGT ‚AUF: NAECHSTES- FREIES. '!BYTE IM: 
4 PUFFER "UND 'ZAEHLT: 'EINGEGEB. ZEICHEN 
'3DOS- -EINGABEPUFFER . ER 


CURSORPOSITION 


HOECHSTE- eh aunee scan 


ie. £ 
„„ ‚RECHTE OBERE. »1tD 


;ZEIGER AUF INTERRUPT- 


. LETZTES ZEICHEN ‚IM: 
:3PUFFER. - 
SEEN ; UMWANDELN. Aw 
05 GROSSBUCHSTABEN 


Bi NEIN. INITIALISIERE 

! . RESERVIERTEN SP 

© FFREIGEBEN' 
AAUSHAENGEN. 
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GENIE DATA 


Mit Testberichten in ‘der 'GENIE N 


DATA: haben: wires ja:immer ein: NE. 288 SER EIERN a 
‚nicht :sehr viel "gemeinsam. ‚Wenn. 
„Sie noch keine Plotter kennen,.der 


bißchen schwer. Zum' einen wollen 
Wir. natürlich nur: ‚Geräte  'vor- 
stellen, die Sie mit. Ihrem Compu- 


ter auch: verwenden können, zum :. 


anderen gibt..es 'natürlich . ‚viele 
Dinge, die. mit einem Genie‘ oder: 


‚Colour. Genie: noch: nicht machbar 
sind. Mit: dem TCS-Plot: 1 haben: 


‚Wir. aber eine Peripherie gefunden; 
die sowohl interessant genug: zum 
„testen. ist, Und. auch :an allen: Ge- 

.„.nies.läuft.: Also, gehen:wir ran... : 


‚also.‘ ‚mit ..einem. Matrixdrucker 


.Norderansicht 


—— Papierführung 000000 
a 7 Staubschutzhaub 


Unterschied: liegt in folgenden: 


zelnen. Punkten ein Bild. zusam-.- 
mensetzt. Das kann. ein. Buchstabe, 
eine Zahl, ein.Sonderzeichen oder 
auch eine: Grafik sein... © 

„Ein: Plotter‘. .hingegen: . verfügt . 


....  über..'einen: oder. mehrere: Stifte, : 
Der Plot:1.ist:ein Plötter. Er.:hat:: 


mit :denen .er. ein Bild, ein. Buch- 


:Bei: einem: Matrixdrucker. wird. 
die ‚Schrift, .oder: die :Grafik, er- 
zeugt, indem. der Drucker .aus-ein- : 


brauchbare 
‚DM. hinblätte 


‚reine Hobby 
viel ist, beko m 


schon für. c 
die Sache 
man: dafi 


stabe, eine Zahl,'etc., zeichnet. .  . st 


0 
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an 57mm. pro: Sekunde; “die: Es 
.;:gonal sogar 81:mm pro Sekunde! ii 
Der‘. .Schrittmotor bringt ::285 
"Schritte: :Pro' Sekunde und liefert 
eine: Auflösung von:.0,2: Milli: 
meter... Die: Zeichengenauigkeit .. 
legt. bei. einer. beachtlichen Wie- '. 
; ‚Serholgerniauigcet von... 0,2 mm... 
x bweichung und bei; 


i been "werden, sind: k 
ge/schreibermienen, in ‚den 








al einzelnen, schen wir uns jetzt an. . Die Belegu r beiden u Sehne d Plc ılh es ni 
Der Plot 1: hat vorne, links vier ste m beiliegenden, deut- 285 der. ot 1 Ihnen einiges ann 
Sr ich auf drei Seiten. telligenz.: bietet. So berechne 


zum: Beispiel die a 
i dei 


en Auch.die Abs in 
chiedensten. ande- 
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2 . 


SCHRS(CI:FRINTE 





t THEN. C=1: -1; S0T0540 

=2 THEN. [= ad: Ana enras 40. 

"THEN C=-1:A2=1:60T0540 

IF.C=4 THEN. C=-40:A2=2: 6070540. 

FEi1)=ArBR40. 
Go IF S{F2t1))5>0-THEN- 20 
SGLECKZUCL): = a a 
eh THEN. IF Arcıco OR Arcıy3S. THEN- 290. = 5 
en P2(n+c1918 THEN 490 


SLPZID-41)-2:8P2D- en 
3 BIN HAOTZIS(PZ(N+AN)E SEN: { 


537: X=17:Y=13:X1= 556: {Ren zIeLAnUen 
FR 6=2 THEN. 1310 





ORI= yien! mL. T: 
7408+1) En 











COLOUR7: PRINTaR (UI. 3)+40, 6. '8";COLOURSEPRINTER (Ui,0)+80,818 1,9 


NEXTI 


oO PLANASIS 


Wil) =l: EVIEVIEL. 


"GOSUB1620: LAY, ED 
sarLzag 2 


T020: NEXTIITRETURN WERTES ee 
20: SOUND. 2er SOUND % 16: ‚SOUND 9 16: SOUND. 10 16: sounD- iz 


1: : SOUND 6, 23 SOUND 7,70 3,3 5 


OF, OO, : 


248,056 299,255,295 


1800 DAT 
1810 DA 
4820 IA 


SOSSLOSTH 
aa, ass LESE 
022. 224.129.198.298 
Zara: 
‚OEL01S . 
‚255, let; mi. 
„255, a 
255, as. 
A828 
se 023,015 


ie 


ouN 








EHRSAR : 









*** PROGRAMME AUS DEM HAUSE HÜBBEN 
sind ganz einfach SUPER *** 











- In Deutschland entwickelt 
und produziert. r 





SEN IE made in Germa 


Der schnellste Z 80 Rechner der Welt. u 












Sie Suchen: einen schnellen. leistungsstarken Fischner neuester Tech- 
nologie? Unser'GENIE !tis arbeitet mit einer Z-80 CPU bei 7,2 MHz’ 


Taktfrequenz. Der 128 K Benutzerspeicher: kann auf der Platine:bis 
256. K erweitert „werden. ‚Für. die‘ hochauflösende‘ Grafik mit einer 
Auflösung von 512 x 512° Punkten stehen ihnen in’2 unabhängigen 
Grafikseiten weitere 64 K Bildwiederholspeicher zur Verfügung. 
Das. Bildformat ist frei wählbar, z.B. 80 x-25, 64 x 16 usw. Der Zeichen- 
satz ist frei programmierbar mit programmierbar mit einer Matrix von bis. zu 8.x16 Punkten. 
Diverse Standardzeichensätze.sind im ‚Betriebssystem enthalten. Die 
deutsche . Tastatur: ist frei beweglich. und enthält 8: frei belegbare 
Funktionstasten. und: natürlich‘ einen: separaten Numerikblock. 
Die. Kapazität der beiden: 5,25" Siimline-Diskettenlaufwerke: beträgt 
1,4 MByte. Jederzeit können weitere 31/2“, 51/2 j“und 8" Laufwerke 
direkt ‚angeschlossen werden. Selbstverständlich‘ kann auch eine 
Harddisk eingebaut-werden. Betriebssysteme. sind CP/M und GDOS 
(GBOS im Lieferumfang), natürlich mit integrierter Grafiksoftware. 





Alleinvertrieb. 
über den Fachhandel durch: 


Kölnstr. 4 
5205 St. Augustin 2 
Tel. 0 22 AV2. 80 71 


COMPUTER GMBH Telex 8 89 702 trom d 








Däs 5 GENIE Ills Ills hat näben dem Centronics-Paralel- ‚Druckerausgang 
und 2RS 232 (\ {V24) Schnittstellen zusätzlich einen universellen 16 Bit 
parallel Ein-Ausgang mit 4 Handshake-Leitungen. 
5 freie Steckplätze (Slots) geben- Ihnen die Möglichkeit zur individuellen ! 

Erweiterung des’Systems. ' = 
Die. Multilayerplatins sowie die beiden Laufwerke: sind zusammen mit 
dem reichlich dimensionierten. Schaltnetzteil in einem formschönen, 

kompakten Metallgehäuse eingebaut. 

Die gesamte Elektronik des GENIE Ills wird von der SIEMENS AG in 


- Deutschland exklusiv für TCS gefertigt. 


Mit den beiden Betriebssystemen CP/M und GDOS haben Sie Zugriff 
auf die größten Softwarenpotentiale.der Welt. 


Informieren Sie sich über unser Angebot für Anwendersoftware. 


nn 


| Bitte Informieren Sie mich kostenlos und ausführlich | 


| COUPON über das GENIE ills, und seine Anwendersoftwäre, | 

[; Fa Na nennen | 
a | 
E: Straße....asuennennnssusnnssnnennnnanennenen knessankeshea | 
| Olten snenaennenanesieetenennanneseen danioonunnoanenmuen | 
| TAIBTON..i.uunnn.] ensnsicneisineneuneseneiereneee | 


